diff options
author | Ramsay Jones <ramsay@ramsay1.demon.co.uk> | 2009-11-19 18:41:20 +0000 |
---|---|---|
committer | Junio C Hamano <gitster@pobox.com> | 2009-11-19 23:01:09 -0800 |
commit | 81f40262a491cd0429ca88476365a7ccedb78684 (patch) | |
tree | 41f74ad7c89dd5e98267623dbf634c807629eb22 /t | |
parent | GIT 1.6.5 (diff) | |
download | tgif-81f40262a491cd0429ca88476365a7ccedb78684.tar.xz |
t9700-perl-git.sh: Fix a test failure on Cygwin
The t/t9700/test.pl script uses method invocation syntax when
using the Cwd module to determine the current working directory.
This fails on cygwin, since cygwin perl specifically checks for
any arguments to the cwd() function and croak()'s with the message
"Usage: Cwd::cwd()". (In perl v5.8.8 distribution, see the file
perl-5.8.8/cygwin/cygwin.c lines 139-157)
In order to avoid the problem, we replace the method invocation
syntax with a simple function call.
Signed-off-by: Ramsay Jones <ramsay@ramsay1.demon.co.uk>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 't')
-rwxr-xr-x | t/t9700/test.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/t9700/test.pl b/t/t9700/test.pl index 6c70aec020..666722d9bf 100755 --- a/t/t9700/test.pl +++ b/t/t9700/test.pl @@ -13,7 +13,7 @@ use File::Basename; BEGIN { use_ok('Git') } # set up -our $abs_repo_dir = Cwd->cwd; +our $abs_repo_dir = cwd(); ok(our $r = Git->repository(Directory => "."), "open repository"); # config |