From: sewardj <unknown>
Date: Mon, 18 Dec 2000 15:44:46 +0000 (+0000)
Subject: [project @ 2000-12-18 15:44:46 by sewardj]
X-Git-Tag: Approximately_9120_patches~3072
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=79afaf6d31dafb492bfe208f313d19ab3f268aeb;p=ghc-hetmet.git

[project @ 2000-12-18 15:44:46 by sewardj]
invert sense of warnSelfImport guard
---

diff --git a/ghc/compiler/rename/RnHiFiles.lhs b/ghc/compiler/rename/RnHiFiles.lhs
index c50d2dd..d7ccd6e 100644
--- a/ghc/compiler/rename/RnHiFiles.lhs
+++ b/ghc/compiler/rename/RnHiFiles.lhs
@@ -152,7 +152,7 @@ tryLoadInterface doc_str mod_name from
 	-- Check that we aren't importing ourselves. 
 	-- That only happens in Rename.checkOldIface, 
 	-- which doesn't call tryLoadInterface
-   warnCheckRn	(moduleName this_mod == mod_name)
+   warnCheckRn	(moduleName this_mod /= mod_name)
 		(warnSelfImport this_mod)		`thenRn_`
 
 	-- READ THE MODULE IN