diff options
Diffstat (limited to 'src/HaddockUtil.hs')
| -rw-r--r-- | src/HaddockUtil.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/HaddockUtil.hs b/src/HaddockUtil.hs index b80e8a1b..4d67f0d7 100644 --- a/src/HaddockUtil.hs +++ b/src/HaddockUtil.hs @@ -20,7 +20,7 @@ module HaddockUtil ( -- * Miscellaneous utilities getProgramName, bye, die, dieMsg, noDieMsg, mapSnd, mapMaybeM, escapeStr, - moduleString, mkModuleNoPkg, + nameOccString, moduleString, mkModuleNoPkg, -- * HTML cross reference mapping html_xrefs_ref, @@ -231,6 +231,8 @@ escapeStr = flip escapeString unreserved escapeStr = escapeURIString isUnreserved #endif +nameOccString = occNameString . nameOccName + moduleString :: Module -> String moduleString = moduleNameString . moduleName |