From bc882daec931dcde171341f1fee32b45b17cc22e Mon Sep 17 00:00:00 2001 From: panne Date: Sat, 14 May 2005 09:59:32 +0000 Subject: [PATCH] [project @ 2005-05-14 09:59:32 by panne] Fixed previous commit --- ghc/compiler/ghci/InteractiveUI.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/ghci/InteractiveUI.hs b/ghc/compiler/ghci/InteractiveUI.hs index 4a4b822..282ad93 100644 --- a/ghc/compiler/ghci/InteractiveUI.hs +++ b/ghc/compiler/ghci/InteractiveUI.hs @@ -764,8 +764,8 @@ checkModule m = do (local,global) = partition ((== modl) . GHC.nameModule) scope in (text "global names: " <+> ppr global) $$ - text "local names: " <+> ppr local)) - _ -> empty + (text "local names: " <+> ppr local) + _ -> empty)) afterLoad (successIf (isJust result)) session reloadModule :: String -> GHCi () -- 1.7.10.4