diff options
Diffstat (limited to 'src/HaddockDB.hs')
| -rw-r--r-- | src/HaddockDB.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/HaddockDB.hs b/src/HaddockDB.hs index 1edd90fd..446bce1d 100644 --- a/src/HaddockDB.hs +++ b/src/HaddockDB.hs @@ -7,6 +7,8 @@ module HaddockDB (ppDocBook) where import HaddockTypes hiding (Doc) +import HaddockUtil + import HsSyn import Pretty import FiniteMap @@ -14,8 +16,8 @@ import FiniteMap ----------------------------------------------------------------------------- -- Printing the results in DocBook format -ppDocBook :: [(Module, Interface)] -> String -ppDocBook mods = render (ppIfaces mods) +ppDocBook :: FilePath -> [(Module, Interface)] -> String +ppDocBook odir mods = render (ppIfaces mods) ppIfaces mods = text "<!DOCTYPE BOOK PUBLIC \"-//OASIS//DTD DocBook V3.1//EN\" [" |