diff options
| -rw-r--r-- | src/HaddockUtil.hs | 5 |
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 |