Fix bug introduced in "Implement fuzzy matching for the Finder"
authorSimon Marlow <marlowsd@gmail.com>
Tue, 8 Feb 2011 09:01:21 +0000 (09:01 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Tue, 8 Feb 2011 09:01:21 +0000 (09:01 +0000)
The finder was reporting a hidden package when it meant a hidden
module, and vice versa (looks like a typo).

compiler/main/Finder.lhs

index 5b1bae4..d8a6271 100644 (file)
@@ -196,7 +196,7 @@ findExposedPackageModule hsc_env mod_name mb_pkg
        Right found
          | null found_exposed   -- Found, but with no exposed copies
           -> return (NotFound { fr_paths = [], fr_pkg = Nothing
-                              , fr_pkgs_hidden = mod_hiddens, fr_mods_hidden = pkg_hiddens
+                              , fr_pkgs_hidden = pkg_hiddens, fr_mods_hidden = mod_hiddens
                               , fr_suggestions = [] })
 
          | [(pkg_conf,_)] <- found_exposed     -- Found uniquely