diff options
author | simonmar <unknown> | 2002-04-11 13:40:31 +0000 |
---|---|---|
committer | simonmar <unknown> | 2002-04-11 13:40:31 +0000 |
commit | fe9b10f8c0758645c680b339b8cc26bfb25697e8 (patch) | |
tree | adfa11682a095eaa758f6c57fedc05b7347e283a /src/HaddockDB.hs | |
parent | 69006c3efae7477ca84fd679f72d6a0a2f500534 (diff) |
[haddock @ 2002-04-11 13:40:30 by simonmar]
- copy haddock.css into the same place as the generated HTML
- new option: --css <file> specifies the style sheet to use
- new option: -o <dir> specifies the directory in which to
generate the output.
- because Haddock now needs to know where to find its default stylesheet,
we have to have a wrapper script and do the haddock-inplace thing
(Makefile code copied largely from fptools/happy).
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\" [" |