X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Frename%2FRnNames.lhs;h=ee6001bf15bdad3432bf5aef9c3d6a1829ad0813;hp=d8d8f3bb6b2773a57f4c6b1e285bdd8c03ff37f4;hb=7b5b3b0cab463e108a0132435a28ef19d17cb32b;hpb=9992bfb6bd3644384b9a26b810ef68f05fd60879

diff --git a/compiler/rename/RnNames.lhs b/compiler/rename/RnNames.lhs
index d8d8f3b..ee6001b 100644
--- a/compiler/rename/RnNames.lhs
+++ b/compiler/rename/RnNames.lhs
@@ -1285,7 +1285,9 @@ warnUnusedImportDecls gbl_env
        ; ifDOptM Opt_D_dump_minimal_imports $
          printMinimalImports usage }
   where
-    explicit_import (L loc _) = isGoodSrcSpan loc
+    explicit_import (L loc _) = case loc of
+                                UnhelpfulSpan _ -> False
+                                RealSrcSpan _ -> True
         -- Filter out the implicit Prelude import
         -- which we do not want to bleat about
 \end{code}