diff options
| author | Ian Lynagh <igloo@earth.li> | 2007-04-30 15:17:37 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2007-04-30 15:17:37 +0000 |
| commit | fcb8fd3a5590cf9b5eddce5cb38ecfc39a41e788 (patch) | |
| tree | 2cea911d9995c58dacf2a826305c451993fa214c | |
| parent | 63cddb36f1dd2e3e41274f494873a62921d3f787 (diff) | |
| download | haskell-fcb8fd3a5590cf9b5eddce5cb38ecfc39a41e788.tar.gz | |
Make GHCi's banner fit in a standard 80-column terminal
| -rw-r--r-- | compiler/ghci/InteractiveUI.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/ghci/InteractiveUI.hs b/compiler/ghci/InteractiveUI.hs index 53afbf3d15..8f22af887b 100644 --- a/compiler/ghci/InteractiveUI.hs +++ b/compiler/ghci/InteractiveUI.hs @@ -89,9 +89,9 @@ import System.Posix.Internals ( setNonBlockingFD ) ghciWelcomeMsg = " ___ ___ _\n"++ " / _ \\ /\\ /\\/ __(_)\n"++ - " / /_\\// /_/ / / | | GHC Interactive, version " ++ cProjectVersion ++ ", for Haskell 98.\n"++ - "/ /_\\\\/ __ / /___| | http://www.haskell.org/ghc/\n"++ - "\\____/\\/ /_/\\____/|_| Type :? for help.\n" + " / /_\\// /_/ / / | | GHC Interactive, version " ++ cProjectVersion ++ ", for Haskell 98.\n"++ + "/ /_\\\\/ __ / /___| | http://www.haskell.org/ghc/\n"++ + "\\____/\\/ /_/\\____/|_| Type :? for help.\n" type Command = (String, String -> GHCi Bool, Bool, String -> IO [String]) cmdName (n,_,_,_) = n |