From: simonmar <unknown>
Date: Thu, 2 Dec 1999 15:52:19 +0000 (+0000)
Subject: [project @ 1999-12-02 15:52:19 by simonmar]
X-Git-Tag: Approximately_9120_patches~5444
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=b79fa717a965a0808bb74f34a14ba86e080193c5;p=ghc-hetmet.git

[project @ 1999-12-02 15:52:19 by simonmar]
"compilation IS required" ===>  ""
---

diff --git a/ghc/compiler/rename/RnNames.lhs b/ghc/compiler/rename/RnNames.lhs
index 333cad9..fa5b376 100644
--- a/ghc/compiler/rename/RnNames.lhs
+++ b/ghc/compiler/rename/RnNames.lhs
@@ -216,9 +216,9 @@ checkEarlyExit mod
 	-- Unchanged source, and no errors yet; see if usage info
 	-- up to date, and exit if so
     checkUpToDate mod						`thenRn` \ up_to_date ->
-    putDocRn (text "Compilation" <+> 
-	      text (if up_to_date then "IS NOT" else "IS") <+>
-	      text "required")					`thenRn_`
+    (if up_to_date 
+	then putDocRn (text "Compilation IS NOT required")
+	else returnRn ())					`thenRn_`
     returnRn up_to_date
 \end{code}