[commit: ghc] master: 80 columns (afb83bc)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/afb83bc1e336d33f436d12abb6dfeca9bfedb9f4/ghc

>---------------------------------------------------------------

commit afb83bc1e336d33f436d12abb6dfeca9bfedb9f4
Author: Simon Marlow <marlowsd at gmail.com>
Date:   Tue Oct 22 20:49:25 2013 +0100

    80 columns


>---------------------------------------------------------------

afb83bc1e336d33f436d12abb6dfeca9bfedb9f4
 compiler/main/Finder.lhs |    6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/compiler/main/Finder.lhs b/compiler/main/Finder.lhs
index f674b19..60683b2 100644
--- a/compiler/main/Finder.lhs
+++ b/compiler/main/Finder.lhs
@@ -191,12 +191,14 @@ findExposedPackageModule hsc_env mod_name mb_pkg
         -- not found in any package:
   = case lookupModuleWithSuggestions (hsc_dflags hsc_env) mod_name of
        Left suggest -> return (NotFound { fr_paths = [], fr_pkg = Nothing
-                                        , fr_pkgs_hidden = [], fr_mods_hidden = []
+                                        , fr_pkgs_hidden = []
+                                        , fr_mods_hidden = []
                                         , fr_suggestions = suggest })
        Right found
          | null found_exposed   -- Found, but with no exposed copies
           -> return (NotFound { fr_paths = [], fr_pkg = Nothing
-                              , fr_pkgs_hidden = pkg_hiddens, fr_mods_hidden = mod_hiddens
+                              , fr_pkgs_hidden = pkg_hiddens
+                              , fr_mods_hidden = mod_hiddens
                               , fr_suggestions = [] })
 
          | [(pkg_conf,_)] <- found_exposed     -- Found uniquely