From d7097e0d05c37652402971093a2ce2c2a73281f4 Mon Sep 17 00:00:00 2001 From: davve Date: Fri, 11 Aug 2006 20:31:51 +0000 Subject: Cleanup --- src/HaddockDevHelp.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'src/HaddockDevHelp.hs') 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" -- cgit v1.2.3