Commit bea0d2d4 authored by Michael Hanus 's avatar Michael Hanus
Browse files

currydoc adapted to new front-end parameter htmldir

parent b136e54a
......@@ -156,7 +156,7 @@ prepareDocDir HtmlDoc docdir = do
-- copying all icons:
--copyIncludeIfPresent docdir "currydocicons/*.gif"
-- copy style sheet:
--copyIncludeIfPresent docdir "currydoc.css"
copyIncludeIfPresent docdir "currydoc.css"
prepareDocDir TexDoc docdir = do
createDir docdir
putStrLn $ "Copy macros into documentation directory \""++docdir++"\"..."
......@@ -382,7 +382,7 @@ translateSource2ColoredHtml docdir progname = do
let output = docdir++"/"++getLastName progname++"_curry.html"
putStrLn ("Writing source file as HTML to \""++output++"\"...")
callFrontendWithParams HTML
(setQuiet True (setOutfile output defaultParams)) progname
(setQuiet True (setHtmlDir docdir defaultParams)) progname
-- translate source file into HTML file with anchors for each function:
translateSource2AnchoredHtml :: String -> String -> IO ()
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment