diff options
| author | panne <unknown> | 2005-01-16 14:37:10 +0000 |
|---|---|---|
| committer | panne <unknown> | 2005-01-16 14:37:10 +0000 |
| commit | 951d840870e67b452387b35c72d235511ed9163c (patch) | |
| tree | c62b706cbe5de938a995073cc15e8e463b581fce /src/HaddockHH2.hs | |
| parent | dae3cc3eb74cfe7e59b18242897584664078233f (diff) | |
[haddock @ 2005-01-16 14:37:10 by panne]
Refactored Text.PrettyPrint legacy hell into a separate module.
Diffstat (limited to 'src/HaddockHH2.hs')
| -rw-r--r-- | src/HaddockHH2.hs | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/src/HaddockHH2.hs b/src/HaddockHH2.hs index 3a9abba5..c71d6045 100644 --- a/src/HaddockHH2.hs +++ b/src/HaddockHH2.hs @@ -1,19 +1,17 @@ module HaddockHH2(ppHH2Contents, ppHH2Index, ppHH2Files, ppHH2Collection) where +import HaddockModuleTree +import HaddockTypes +import HaddockUtil import HsSyn hiding(Doc) +import qualified Map +import PrettyPrint -#if __GLASGOW_HASKELL__ < 503 -import Pretty -#else -import Text.PrettyPrint +#if __GLASGOW_HASKELL__ >= 503 import Data.Char ( toUpper ) #endif import Maybe ( fromMaybe ) -import HaddockModuleTree -import HaddockUtil -import HaddockTypes -import qualified Map ppHH2Contents :: FilePath -> String -> Maybe String -> [ModuleTree] -> IO () ppHH2Contents odir doctitle maybe_package tree = do |