aboutsummaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 6329d22b..95cd4acd 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -180,7 +180,7 @@ render flags ifaces installedIfaces = do
visibleIfaces = [ i | i <- ifaces, OptHide `notElem` ifaceOptions i ]
- -- *all* visible interfaces including external package modules
+ -- *All* visible interfaces including external package modules.
allIfaces = map toInstalledIface ifaces ++ installedIfaces
allVisibleIfaces = [ i | i <- allIfaces, OptHide `notElem` instOptions i ]
@@ -188,7 +188,7 @@ render flags ifaces installedIfaces = do
packageStr = Just (modulePackageString packageMod)
(pkgName,pkgVer) = modulePackageInfo packageMod
- -- which HTML rendering to use
+ -- Which HTML rendering to use.
pick htmlF xhtmlF = if (Flag_Xhtml `elem` flags) then xhtmlF else htmlF
ppHtmlIndex = pick Html.ppHtmlIndex Xhtml.ppHtmlIndex
ppHtmlHelpFiles = pick Html.ppHtmlHelpFiles Xhtml.ppHtmlHelpFiles