Commit c66b73ec authored by panne's avatar panne
Browse files

[project @ 2001-04-30 13:50:59 by panne]

o=>O:-)
parent 38bf652b
......@@ -324,7 +324,7 @@ filterImports mod from (Just (want_hiding, import_items)) total_avails
Just avail@(AvailTC _ [n]) -> -- This occurs when you import T(..), but
-- only export T abstractly. The single [n]
-- in the AvailTC is the type or class itself
ifOptRn opt_WarnMisc (addWarnRn (dodgyImportWarn mod item)) `thenRn_`
ifOptRn Opt_WarnMisc (addWarnRn (dodgyImportWarn mod item)) `thenRn_`
returnRn [(avail, [availName avail])]
Just avail -> returnRn [(avail, [availName avail])]
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment