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

Improve the module-not-found error message when we didn't actually
search for it anywhere.  This happens when we know all the places it
might be: either in the current program, or a package.

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