diff options
| author | Ian Lynagh <igloo@earth.li> | 2010-10-03 12:57:07 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2010-10-03 12:57:07 +0000 |
| commit | 92a5f4abbd32c0a28b75207b368d86e59515683d (patch) | |
| tree | 91ff56cedcebe2dc28f237144168a896e1e81a4c | |
| parent | adf986b4bd4a3b838b0a8809a7b28d7785dfda2f (diff) | |
| download | haskell-92a5f4abbd32c0a28b75207b368d86e59515683d.tar.gz | |
Replace an outputStr with putStrLn calls; fixes #4332
| -rw-r--r-- | ghc/InteractiveUI.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index c457d8a68d..11a3c98f10 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -894,7 +894,8 @@ changeDirectory "" = do changeDirectory dir = do graph <- GHC.getModuleGraph when (not (null graph)) $ - outputStr "Warning: changing directory causes all loaded modules to be unloaded,\nbecause the search path has changed.\n" + do liftIO $ putStrLn "Warning: changing directory causes all loaded modules to be unloaded," + liftIO $ putStrLn "because the search path has changed." prev_context <- GHC.getContext GHC.setTargets [] _ <- GHC.load LoadAllTargets |