aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2014-01-10 18:17:43 +0000
committerSimon Peyton Jones <simonpj@microsoft.com>2014-01-10 18:17:43 +0000
commit030c726ac75a16fc13ff6d66357331a37374e65f (patch)
treea0b789aa64f8080ecfcd7828afc4df5c78a4f52a
parent0f6a628a149dd46960d701ae54fdfc057a168640 (diff)
Adapt to small change in Pretty's exports
-rw-r--r--src/Haddock/Backends/LaTeX.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Haddock/Backends/LaTeX.hs b/src/Haddock/Backends/LaTeX.hs
index c69f1e18..0bc95719 100644
--- a/src/Haddock/Backends/LaTeX.hs
+++ b/src/Haddock/Backends/LaTeX.hs
@@ -128,7 +128,7 @@ ppLaTeXTop doctitle packageStr odir prologue maybe_style ifaces = do
filename = odir </> (fromMaybe "haddock" packageStr <.> "tex")
- writeFile filename (render tex)
+ writeFile filename (show tex)
ppLaTeXModule :: String -> FilePath -> Interface -> IO ()
@@ -401,7 +401,7 @@ declWithDoc :: LaTeX -> Maybe LaTeX -> LaTeX
declWithDoc decl doc =
text "\\begin{haddockdesc}" $$
text "\\item[\\begin{tabular}{@{}l}" $$
- text (latexMonoFilter (render decl)) $$
+ text (latexMonoFilter (show decl)) $$
text "\\end{tabular}]" <>
(if isNothing doc then empty else text "\\haddockbegindoc") $$
maybe empty id doc $$
@@ -416,7 +416,7 @@ multiDecl decls =
text "\\begin{haddockdesc}" $$
vcat [
text "\\item[" $$
- text (latexMonoFilter (render decl)) $$
+ text (latexMonoFilter (show decl)) $$
text "]"
| decl <- decls ] $$
text "\\end{haddockdesc}"