aboutsummaryrefslogtreecommitdiff
path: root/src/HaddockRename.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/HaddockRename.hs')
-rw-r--r--src/HaddockRename.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/HaddockRename.hs b/src/HaddockRename.hs
index 4c5a631b..d43fb959 100644
--- a/src/HaddockRename.hs
+++ b/src/HaddockRename.hs
@@ -191,9 +191,9 @@ lookupIdString str = do
renameExportItems items = mapM rn items
where
- rn (ExportGroup lev doc)
+ rn (ExportGroup lev id doc)
= do doc <- renameDoc doc
- return (ExportGroup lev doc)
+ return (ExportGroup lev id doc)
rn (ExportDecl decl)
= do decl <- renameDecl decl
return (ExportDecl decl)