[project @ 2000-11-27 11:58:55 by sewardj]

Remember to set GHCiState.target the first time.

diff --git a/ghc/compiler/ghci/InteractiveUI.hs b/ghc/compiler/ghci/InteractiveUI.hs
index 863176b..35d03e4 100644 (file)
--- a/ghc/compiler/ghci/InteractiveUI.hs
+++ b/ghc/compiler/ghci/InteractiveUI.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: InteractiveUI.hs,v 1.15 2000/11/24 17:09:52 simonmar Exp $
+-- $Id: InteractiveUI.hs,v 1.16 2000/11/27 11:58:55 sewardj Exp $
 --
 -- GHC Interactive User Interface
 --
@@ -108,7 +108,7 @@ interactiveUI cmstate mod = do
 
    (unGHCi uiLoop) GHCiState{ modules = mods,
                              current_module = this_mod,
-                             target = Nothing,
+                             target = mod,
                              cmstate = cmstate',
                              options = [ShowTiming]}
    return ()