parent
98fa4e4053
commit
d0b00b91d0
@ -1,3 +1,4 @@
|
|||||||
hscolour-1.17.tar.gz
|
hscolour-1.17.tar.gz
|
||||||
/hscolour-1.19.tar.gz
|
/hscolour-1.19.tar.gz
|
||||||
/hscolour-1.20.2.tar.gz
|
/hscolour-1.20.2.tar.gz
|
||||||
|
/hscolour-1.20.3.tar.gz
|
||||||
|
@ -1,10 +0,0 @@
|
|||||||
--- hscolour-1.20.2/Language/Haskell/HsColour/Anchors.hs 2012-05-30 05:56:51.000000000 +0900
|
|
||||||
+++ hscolour/Language/Haskell/HsColour/Anchors.hs 2012-07-26 19:15:10.696737130 +0900
|
|
||||||
@@ -42,6 +42,7 @@
|
|
||||||
|| isURIFragmentValid x
|
|
||||||
|| isLower x
|
|
||||||
|| isUpper x = [x]
|
|
||||||
+ | ord x >= 256 = [x] -- not correct, but better than nothing
|
|
||||||
| otherwise = ['%',hexHi (ord x), hexLo (ord x)]
|
|
||||||
hexHi d = intToDigit (d`div`16)
|
|
||||||
hexLo d = intToDigit (d`mod`16)
|
|
Loading…
Reference in new issue