aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorNeil Mitchell <unknown>2008-06-16 06:53:29 +0000
committerNeil Mitchell <unknown>2008-06-16 06:53:29 +0000
commit47ec4e22e31e0531f2d412e754fd66eb4f7ba34f (patch)
treeb3525c86b2fb3d468c040cd7caf85cfb03e064ed /src
parent9b446da6cc7710114efc5088103d3902ebda6df9 (diff)
Change packageName to packageStr, as it better reflects the information stored in it
Diffstat (limited to 'src')
-rw-r--r--src/Main.hs12
1 files changed, 6 insertions, 6 deletions
diff --git a/src/Main.hs b/src/Main.hs
index a5381aff..48c92a73 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -203,32 +203,32 @@ render flags interfaces installedIfaces = do
allVisibleIfaces = map toInstalledIface visibleIfaces
++ installedIfaces
- packageName = (Just . modulePkgStr . ifaceMod . head) visibleIfaces
+ packageStr = (Just . modulePkgStr . ifaceMod . head) visibleIfaces
when (Flag_GenIndex `elem` flags) $ do
- ppHtmlIndex odir title packageName maybe_html_help_format
+ ppHtmlIndex odir title packageStr maybe_html_help_format
maybe_contents_url maybe_source_urls maybe_wiki_urls
allVisibleIfaces
copyHtmlBits odir libdir css_file
when (Flag_GenContents `elem` flags && Flag_GenIndex `elem` flags) $ do
- ppHtmlHelpFiles title packageName visibleIfaces odir maybe_html_help_format []
+ ppHtmlHelpFiles title packageStr visibleIfaces odir maybe_html_help_format []
when (Flag_GenContents `elem` flags) $ do
- ppHtmlContents odir title packageName maybe_html_help_format
+ ppHtmlContents odir title packageStr maybe_html_help_format
maybe_index_url maybe_source_urls maybe_wiki_urls
allVisibleIfaces True prologue
copyHtmlBits odir libdir css_file
when (Flag_Html `elem` flags) $ do
- ppHtml title packageName visibleIfaces odir
+ ppHtml title packageStr visibleIfaces odir
prologue maybe_html_help_format
maybe_source_urls maybe_wiki_urls
maybe_contents_url maybe_index_url
copyHtmlBits odir libdir css_file
when (Flag_Hoogle `elem` flags) $ do
- ppHoogle packageName visibleIfaces odir
+ ppHoogle packageStr visibleIfaces odir
-------------------------------------------------------------------------------
-- Reading and dumping interface files