aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordavve@dtek.chalmers.se <David Waern>2007-03-26 05:24:26 +0000
committerdavve@dtek.chalmers.se <David Waern>2007-03-26 05:24:26 +0000
commit80966ec53d0f236b83c2b9a99e40ef56217ec86c (patch)
treee9e44f1d0968d7127075b0a7ddd2a7b4eaef897a
parent6ebc895072968d490c8a5d0a78b01a2b0477fc6d (diff)
Fix stupid compile error
-rw-r--r--src/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 46c1353b..264c1ec3 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -880,8 +880,8 @@ fullContentsOfThisModule module_ entities declMap docMap
where
mkExportItem (DocEntity (DocGroup lev doc)) = Just (ExportGroup lev "" doc)
mkExportItem (DeclEntity name) = fmap mkExport (Map.lookup name declMap)
- mkExportItem _ = Nothing
where mkExport decl = ExportDecl name decl (Map.lookup name docMap) []
+ mkExportItem _ = Nothing
-- Sometimes the declaration we want to export is not the "main" declaration:
-- it might be an individual record selector or a class method. In these