diff --git a/configure b/configure
index 0654727..080977d 100644
--- a/configure
+++ b/configure
@@ -1374,7 +1374,7 @@ fi
 
 # Find pwd, in a cygwin friendly way.
 # Suggested by: http://www.haskell.org/ghc/docs/latest/html/users_guide/ch11s04.html
-TOP=`echo "Directory.getCurrentDirectory >>= putStrLn.init.tail.show " | ghci -ignore-dot-ghci -v0`
+TOP=`echo "Directory.getCurrentDirectory >>= putStrLn.init.tail.show " | ghcii.sh -ignore-dot-ghci -v0`
 
 
 # necessary tools
diff --git a/configure.ac b/configure.ac
index eb60996..e90c0d1 100644
--- a/configure.ac
+++ b/configure.ac
@@ -66,7 +66,7 @@ AC_SUBST(SYMS)
 
 # Find pwd, in a cygwin friendly way. 
 # Suggested by: http://www.haskell.org/ghc/docs/latest/html/users_guide/ch11s04.html
-TOP=`echo "Directory.getCurrentDirectory >>= putStrLn.init.tail.show " | ghci -ignore-dot-ghci -v0`
+TOP=`echo "Directory.getCurrentDirectory >>= putStrLn.init.tail.show " | ghcii.sh -ignore-dot-ghci -v0`
 AC_SUBST(TOP)
 
 # necessary tools