diff options
author | davve <davve@dtek.chalmers.se> | 2007-02-04 17:59:54 +0000 |
---|---|---|
committer | davve <davve@dtek.chalmers.se> | 2007-02-04 17:59:54 +0000 |
commit | ab6cfc49cc33eaa2879f4e615f10ef0a1d3f362a (patch) | |
tree | 3fb06cc71f1261cffbcc238c5edbc73dd5cf7250 | |
parent | 357bc99bb13c68ffb6e1b10f6739fe5f753b9fe3 (diff) |
Do not list entities without documentation
-rw-r--r-- | src/Main.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/src/Main.hs b/src/Main.hs index 59e4b751..31d109e1 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -874,11 +874,7 @@ mkExportItems mod_map this_mod exported_names exportedDeclMap localDeclMap sub_m | (Just decl, maybeDoc) <- findDecl t = return [ ExportDecl t (restrictTo subs (extractDecl t mdl decl)) maybeDoc [] ] | otherwise - = return [ ExportNoDecl t t subs ] - -- can't find the decl (it might be from another package), but let's - -- list the entity anyway. Later on, the renamer will change the - -- orig name into the import name, so we get a proper link to - -- the doc for this entity. + = return [] where mdl = nameModule t subs = filter (`elem` exported_names) all_subs |