haddock-0.8でUTF8を使ったドキュメントが文字化けする

ソースを見てみるとASCII以外はエスケープして表示しているみたいです。何て乱暴な力強いコードなんだろう。むー、Haskellの入出力まわりでUTF8⇔UCS4の変換があったら少し話は違うのですが、ま、とりあえず以下のパッチで回避します。

--- haddock-0.8.orig/src/Html.hs        2006-12-21 23:29:59.953620800 +0900
+++ haddock-0.8/src/Html.hs     2006-12-21 23:30:09.847848000 +0900
@@ -155,9 +155,7 @@
       fixChar '>' = ">"
       fixChar '&' = "&"
       fixChar '"' = """
-      fixChar c
-       | isAscii c = [c]
-       | otherwise = "&#x" ++ showHex (ord c) ";"
+      fixChar c   = [c]

 -- ---------------------------------------------------------------------------
 -- Classes