From d9d1dc64baab3284103676fb14b4128e47a1da4f Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 9 Feb 2001 15:33:51 +0000
Subject: [PATCH] [project @ 2001-02-09 15:33:51 by simonmar] Introducing the
 new warm/cuddly GHCi logo.

---
 ghc/compiler/ghci/InteractiveUI.hs |   13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/ghc/compiler/ghci/InteractiveUI.hs b/ghc/compiler/ghci/InteractiveUI.hs
index a420ff6..a03b2fe 100644
--- a/ghc/compiler/ghci/InteractiveUI.hs
+++ b/ghc/compiler/ghci/InteractiveUI.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: InteractiveUI.hs,v 1.36 2001/02/09 10:08:09 simonmar Exp $
+-- $Id: InteractiveUI.hs,v 1.37 2001/02/09 15:33:51 simonmar Exp $
 --
 -- GHC Interactive User Interface
 --
@@ -46,12 +46,11 @@ import Monad ( when )
 -----------------------------------------------------------------------------
 
 ghciWelcomeMsg = "\ 
-\ _____  __   __  ____         _________________________________________________\n\ 
-\(|	 ||   || (|  |)        GHC Interactive, version 5.00   	                \n\ 
-\||  __  ||___|| ||     ()     For Haskell 98.                    		\n\ 
-\||   |) ||---|| ||     ||     http://www.haskell.org/ghc         		\n\ 
-\||   || ||   || ||     (|     Bug reports to: glasgow-haskell-bugs@haskell.org \n\ 
-\(|___|| ||   || (|__|) \\\\______________________________________________________\n"
+\   ___         ___ _ 							     \n\ 
+\  / _ \\ /\\  /\\/ __(_)      GHC Interactive, version 5.00, For Haskell 98.   \n\ 
+\ / /_\\// /_/ / /  | |      http://www.haskell.org/ghc                       \n\ 
+\/ /_\\\\/ __  / /___| |      Bug reports to: glasgow-haskell-bugs@haskell.org \n\ 
+\\\____/\\/ /_/\\____/|_|      Type :? for help.\n"
 
 commands :: [(String, String -> GHCi Bool)]
 commands = [
-- 
1.7.10.4