add upstream change to workaround errors with unicode points > 255

hopefully should fix build failures of case-insensitive,
monad-control and transformers-base with hscolour-1.20.2:

HsColour: Char.intToDigit: not a digit 541
epel9
Jens Petersen 13 years ago
parent 304c234f76
commit 810695248b

@ -0,0 +1,10 @@
--- 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…
Cancel
Save