From c595811ef4e6378e5df41f680b644d7665cf4682 Mon Sep 17 00:00:00 2001 From: David Waern Date: Sun, 10 Feb 2008 00:48:06 +0000 Subject: Update the version message to fit in small terminals --- src/Main.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Main.hs') diff --git a/src/Main.hs b/src/Main.hs index 597048fb..e8f14654 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -286,8 +286,8 @@ handleEasyFlags flags fileArgs = do throwE ("-h cannot be used with --gen-index or --gen-contents") where byeVersion = bye $ - "Haddock version " ++ projectVersion ++ - ", (c) Simon Marlow 2006; ported to the GHC-API by David Waern 2006-2007\n" + "Haddock version " ++ projectVersion ++ ", (c) Simon Marlow 2006\n" + ++ "Ported to use the GHC API by David Waern 2006-2008\n" byeGhcVersion = bye $ (fromJust $ lookup "Project version" $ compilerInfo) ++ "\n" -- cgit v1.2.3