diff options
author | Sebastian Meric de Bellefon <arnaudpourseb@gmail.com> | 2016-06-22 22:51:30 -0400 |
---|---|---|
committer | Sebastian Meric de Bellefon <arnaudpourseb@gmail.com> | 2016-06-22 23:08:28 -0400 |
commit | bc8de008b271ca4b9eb99f8043d08c42ab1734f0 (patch) | |
tree | 51e754c262330547574454c33230966fe4621d4a /haddock-api | |
parent | 1cb73d6afaa2438dc67fa70fd3a8c64ba68343a0 (diff) |
do not create empty src directory
Fix #536.
Diffstat (limited to 'haddock-api')
-rw-r--r-- | haddock-api/src/Haddock.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/haddock-api/src/Haddock.hs b/haddock-api/src/Haddock.hs index 5e8f4a4a..28974d19 100644 --- a/haddock-api/src/Haddock.hs +++ b/haddock-api/src/Haddock.hs @@ -336,7 +336,7 @@ render dflags flags qual ifaces installedIfaces extSrcMap = do ppLaTeX title pkgStr visibleIfaces odir (fmap _doc prologue) opt_latex_style libDir - when (Flag_HyperlinkedSource `elem` flags) $ do + when (Flag_HyperlinkedSource `elem` flags && not (null ifaces)) $ do ppHyperlinkedSource odir libDir opt_source_css pretty srcMap ifaces -- | From GHC 7.10, this function has a potential to crash with a |