Try and find a better package name than "main" for Hoogle, goes wrong when working on an executable rather than a library

1 files changed, 2 insertions, 1 deletions

diff --git a/src/Main.hs b/src/Main.hs
index 8f3895bd..686e9237 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -301,7 +301,8 @@ render flags ifaces installedIfaces = do
     copyHtmlBits odir libdir css_file
 
   when (Flag_Hoogle `elem` flags) $ do
-    ppHoogle pkgName pkgVer title prologue visibleIfaces odir
+    let pkgName2 = if pkgName == "main" && title /= [] then title else pkgName
+    ppHoogle pkgName2 pkgVer title prologue visibleIfaces odir
 
 
 -------------------------------------------------------------------------------