diff --git a/ghc/compiler/main/Main.lhs b/ghc/compiler/main/Main.lhs
index 239ccb8207eceef9f34a2309e728009903c885e7..a1eb377ffa7fb2a1a8a944ccec22cbfc1ac7f79b 100644
--- a/ghc/compiler/main/Main.lhs
+++ b/ghc/compiler/main/Main.lhs
@@ -76,9 +76,9 @@ doIt :: ([CoreToDo], [StgToDo]) -> IO ()
 
 doIt (core_cmds, stg_cmds)
   = doIfSet opt_Verbose 
-	(hPutStr stderr ("Glasgow Haskell Compiler, version " ++ 
-			 show PROJECTVERSION ++ 
-			 ", for Haskell 1.4\n"))		>>
+	(hPutStr stderr ("Glasgow Haskell Compiler, version\ 
+			 \ PROJECTVERSION\ 
+			 \, for Haskell 1.4\n"))		>>
 
     -- ******* READER
     show_pass "Reader"	>>