aboutsummaryrefslogtreecommitdiff
path: root/src/HaddockUtil.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/HaddockUtil.hs')
-rw-r--r--src/HaddockUtil.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/HaddockUtil.hs b/src/HaddockUtil.hs
index bf326b82..f6152722 100644
--- a/src/HaddockUtil.hs
+++ b/src/HaddockUtil.hs
@@ -447,7 +447,12 @@ mapMaybeM _ Nothing = return Nothing
mapMaybeM f (Just a) = f a >>= return . Just
escapeStr :: String -> String
+#if __GLASGOW_HASKELL__ < 603
escapeStr str = escapeString str unreserved
+#else
+escapeStr str = escapeString unreserved str
+#endif
+
-----------------------------------------------------------------------------
-- HTML cross references