From 4ff8aecd97c39f212bc334f28c7b8265d5ccc197 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Wed, 20 Mar 2002 19:42:49 +0000
Subject: [PATCH] [project @ 2002-03-20 19:42:49 by sof] maybeHomeModule: if
 chasing after a source import, _only_ look for hi-boots

---
 ghc/compiler/main/Finder.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/main/Finder.lhs b/ghc/compiler/main/Finder.lhs
index fc945b6..ce01c28 100644
--- a/ghc/compiler/main/Finder.lhs
+++ b/ghc/compiler/main/Finder.lhs
@@ -99,7 +99,7 @@ maybeHomeModule mod_name is_source = do
 	]
 
    searchPathExts home_path basename
-	(if is_source then (boot_exts++std_exts) else std_exts ++ boot_exts)
+	(if is_source then boot_exts else (std_exts ++ boot_exts))
 			-- for SOURCE imports, check the hi-boot extensions
 			-- before the source/iface ones, to avoid
 			-- creating circ Makefile deps.
-- 
1.7.10.4