diff options
author | davve <davve@dtek.chalmers.se> | 2006-08-11 20:31:51 +0000 |
---|---|---|
committer | davve <davve@dtek.chalmers.se> | 2006-08-11 20:31:51 +0000 |
commit | d7097e0d05c37652402971093a2ce2c2a73281f4 (patch) | |
tree | c8c0ab24e2ec3e65c6b91f5dc0b052b1afa9d647 /src/HaddockDevHelp.hs | |
parent | 20c21b530551f5174a10905e2517edff1333357f (diff) |
Cleanup
Diffstat (limited to 'src/HaddockDevHelp.hs')
-rw-r--r-- | src/HaddockDevHelp.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/HaddockDevHelp.hs b/src/HaddockDevHelp.hs index 511cfe90..adfee1e2 100644 --- a/src/HaddockDevHelp.hs +++ b/src/HaddockDevHelp.hs @@ -3,17 +3,14 @@ module HaddockDevHelp(ppDevHelpFile) where import HaddockModuleTree import HaddockTypes import HaddockUtil -import HsSyn2 hiding (Doc, Module) -import qualified Map import Module ( moduleString, Module ) import Name ( Name, nameModule, getOccString ) - import Data.Maybe ( fromMaybe ) +import qualified Data.Map as Map import Text.PrettyPrint - ppDevHelpFile :: FilePath -> String -> Maybe String -> [HaddockModule] -> IO () ppDevHelpFile odir doctitle maybe_package modules = do let devHelpFile = package++".devhelp" |