From 2c7c0d8266e5e68bcc10b8f6c5c40f1b493102e6 Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Tue, 25 Nov 1997 10:27:46 +0000
Subject: [PATCH] [project @ 1997-11-25 10:27:46 by simonm] change -i
 semantics to match GHC.

---
 ghc/utils/mkdependHS/mkdependHS.prl |    6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/ghc/utils/mkdependHS/mkdependHS.prl b/ghc/utils/mkdependHS/mkdependHS.prl
index fe86282..f76bee6 100644
--- a/ghc/utils/mkdependHS/mkdependHS.prl
+++ b/ghc/utils/mkdependHS/mkdependHS.prl
@@ -240,8 +240,10 @@ sub mangle_command_line_args {
 
 	} elsif ( /^-D(.*)/ ) { # recognized wherever they occur
 	    push(@Defines, $_);
-	} elsif ( /^-i(.*)/ ) { # ditto
-	    $Import_dirs .= ":$1";
+	} elsif ( /^-i$/ ) {
+	    $Import_dirs = ''; # import path cleared!
+	} elsif ( /^-i(.*)/ ) {
+	    $Import_dirs = "$1:$Import_dirs";
 	} elsif ( /^-I/ ) {
 	    $Include_dirs .= " $_";
 	} elsif ( /^-syslib$/ ) {
-- 
1.7.10.4