diff options
| author | David Waern <david.waern@gmail.com> | 2010-11-15 23:27:13 +0000 |
|---|---|---|
| committer | David Waern <david.waern@gmail.com> | 2010-11-15 23:27:13 +0000 |
| commit | c3b49f3b4f2be4dd6b077b8484f6ac9360e75f7d (patch) | |
| tree | 02d559765dad972bc41de0f291decc7846217489 | |
| parent | 3792158f04a7cf14c700ecab448f043b8ddec6b7 (diff) | |
Wibble
| -rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index c6a5d2c7..8d5d0d08 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -215,7 +215,7 @@ render flags ifaces installedIfaces srcMap = do libDir <- getHaddockLibDir flags prologue <- getPrologue flags - themes <- getThemes libDir flags >>= either bye return + themes <- getThemes libDir flags >>= either bye return when (Flag_GenIndex `elem` flags) $ do ppHtmlIndex odir title pkgStr |