[project @ 2005-02-14 16:49:50 by simonmar]

[ghc-hetmet.git] / ghc / compiler / main / Finder.lhs

diff --git a/ghc/compiler/main/Finder.lhs b/ghc/compiler/main/Finder.lhs
index 6173853..260ee07 100644 (file)
--- a/ghc/compiler/main/Finder.lhs
+++ b/ghc/compiler/main/Finder.lhs
@@ -429,6 +429,8 @@ cantFindError dflags mod_name find_result
                   <+> ppr pkg)
 
            NotFound files
+               | null files
+               -> ptext SLIT("it is not a module in the current program, or in any known package.")
                | verbosity dflags < 3 
                -> ptext SLIT("use -v to see a list of the files searched for")
                | otherwise