From: Daniel Stenberg <daniel@haxx.se>
Date: Tue, 12 Aug 2003 21:18:39 +0000 (+0000)
Subject: David Byron's fix that makes this script use 'cygpath' instead of 'pwd' if
X-Git-Tag: curl-7_10_7~27
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=019e6122252cd0feef2d0a4ed2ba1d704a10c56b;p=curl

David Byron's fix that makes this script use 'cygpath' instead of 'pwd' if
this runs on windows, to find out the current working directory.
---

diff --git a/tests/runtests.pl b/tests/runtests.pl
index 4af8665f6..450d49aab 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -452,6 +452,22 @@ sub checkcurl {
 
             $curl =~ s/^(.*)(libcurl.*)/$1/g;
             $libcurl = $2;
+
+           if ($curl =~ /win32/)
+           {
+               # Native Windows builds don't understand the
+               # output of cygwin's pwd.  It will be
+               # something like /cygdrive/c/<some path>.
+               #
+               # Use the cygpath utility to convert the
+               # working directory to a Windows friendly
+               # path.  The -m option converts to use drive
+               # letter:, but it uses / instead \.  Forward
+               # slashes (/) are easier for us.  We don't
+               # have to escape them to get them to curl
+               # through a shell.
+               chomp($pwd = `cygpath -m $pwd`);
+           }
         }
         elsif($_ =~ /^Protocols: (.*)/i) {
             # these are the supported protocols, we don't use this knowledge