diff options
Diffstat (limited to 'qtest')
| -rw-r--r-- | qtest/module/TestDriver.pm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/qtest/module/TestDriver.pm b/qtest/module/TestDriver.pm index 061d0e26..bc1cdb1c 100644 --- a/qtest/module/TestDriver.pm +++ b/qtest/module/TestDriver.pm @@ -1780,10 +1780,7 @@ sub winrun my $tempfilename = "$tempdir/winrun.tmp"; if (! defined $winbin) { - my $comspec = $ENV{'COMSPEC'}; - $comspec =~ s,\\,/,g; - if ((system("sh -c 'cd /bin; $comspec /c cd'" . - " > $tempfilename") == 0) && + if ((system("sh -c 'cd /bin; pwd -W' > $tempfilename") == 0) && open(F, "<$tempfilename")) { $winbin = <F>; |