diff options
Diffstat (limited to 'src/HaddockRename.hs')
| -rw-r--r-- | src/HaddockRename.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/HaddockRename.hs b/src/HaddockRename.hs index ad90c1a2..86e74490 100644 --- a/src/HaddockRename.hs +++ b/src/HaddockRename.hs @@ -265,6 +265,10 @@ renameExportItems items = mapM rn items = do decl <- renameDecl decl0 mapM renameInstHead insts return (ExportDecl x decl insts) + rn (ExportNoDecl x y subs) + = do y' <- lookupRn id y + subs' <- mapM (lookupRn id) subs + return (ExportNoDecl x y' subs') rn (ExportDoc doc0) = do doc <- renameDoc doc0 return (ExportDoc doc) |