aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/HaddockRename.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/HaddockRename.hs b/src/HaddockRename.hs
index 5199c013..aff9fbcd 100644
--- a/src/HaddockRename.hs
+++ b/src/HaddockRename.hs
@@ -275,7 +275,7 @@ renameExportItems items = mapM rn items
return (ExportGroup lev id0 doc)
rn (ExportDecl x decl0 insts) -- x is an original name, don't rename it
= do decl <- renameDecl decl0
- mapM renameInstHead insts
+ insts <- mapM renameInstHead insts
return (ExportDecl x decl insts)
rn (ExportNoDecl x y subs)
= do y' <- lookupRn id y