diff options
| -rw-r--r-- | src/HaddockHtml.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/HaddockHtml.hs b/src/HaddockHtml.hs index 1d9f3c5e..8c17547f 100644 --- a/src/HaddockHtml.hs +++ b/src/HaddockHtml.hs @@ -435,7 +435,7 @@ ppHtmlModule odir doctitle source_url ifaceToHtml mdl iface </> s15 </> footer ) - writeFile (odir++moduleHtmlFile mdl) (renderHtml html False) + writeFile (odir ++ pathSeparator:moduleHtmlFile mdl) (renderHtml html False) ifaceToHtml :: String -> Interface -> HtmlTable ifaceToHtml _ iface |