This is an automated email from the git hooks/post-receive script.

abe pushed a commit to annotated tag 0.52
in repository libcgi-test-perl.

commit 41ee5729779dc9a850c2ba2926c0f739c4dbb4b5
Author: Alex Tokarev <noh...@nohuhu.org>
Date:   Sat Sep 13 10:39:58 2014 -0700

    Fixed a bug that caused test failures in Windows
---
 t/01_env.t      | 2 +-
 t/02_parsing.t  | 2 +-
 t/03_get.t      | 2 +-
 t/04_post.t     | 2 +-
 t/lib/browse.pm | 2 +-
 5 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/t/01_env.t b/t/01_env.t
index 7b49cd0..8365b38 100644
--- a/t/01_env.t
+++ b/t/01_env.t
@@ -12,7 +12,7 @@ use constant WINDOWS => eval { $^O =~ /Win32|cygwin/ };
 # failing miserably; considering that custom builds are very common
 # among CPAN testers, this could be considered a serious problem.
 #
-$ENV{PATH} = $Config{bin} . ':' . $ENV{PATH};
+$ENV{PATH} = $Config{bin} . (WINDOWS ? ';' : ':') . $ENV{PATH};
 
 my $SERVER = "some-server";
 my $PORT = 18;
diff --git a/t/02_parsing.t b/t/02_parsing.t
index cc394fb..4063505 100644
--- a/t/02_parsing.t
+++ b/t/02_parsing.t
@@ -7,7 +7,7 @@ use CGI::Test;
 
 use constant WINDOWS => eval { $^O =~ /Win32|cygwin/ };
 
-$ENV{PATH} = $Config{bin} . ':' . $ENV{PATH};
+$ENV{PATH} = $Config{bin} . (WINDOWS ? ';' : ':') . $ENV{PATH};
 
 my $BASE = "http://server:18/cgi-bin";;
 my $SCRIPT = WINDOWS ? "getform.bat" : "getform";
diff --git a/t/03_get.t b/t/03_get.t
index ddd4a70..64951da 100644
--- a/t/03_get.t
+++ b/t/03_get.t
@@ -6,7 +6,7 @@ use CGI::Test;
 
 use constant WINDOWS => eval { $^O =~ /Win32|cygwin/ };
 
-$ENV{PATH} = $Config{bin} . ':' . $ENV{PATH};
+$ENV{PATH} = $Config{bin} . (WINDOWS ? ';' : ':') . $ENV{PATH};
 
 my $BASE = "http://server:18/cgi-bin";;
 my $SCRIPT = WINDOWS ? "getform.bat" : "getform";
diff --git a/t/04_post.t b/t/04_post.t
index c77f322..8f3c689 100644
--- a/t/04_post.t
+++ b/t/04_post.t
@@ -6,7 +6,7 @@ use CGI::Test;
 
 use constant WINDOWS => eval { $^O =~ /Win32|cygwin/ };
 
-$ENV{PATH} = $Config{bin} . ':' . $ENV{PATH};
+$ENV{PATH} = $Config{bin} . (WINDOWS ? ';' : ':') . $ENV{PATH};
 
 my $BASE = "http://server:18/cgi-bin";;
 my $SCRIPT = WINDOWS ? 'getform.bat' : 'getform';
diff --git a/t/lib/browse.pm b/t/lib/browse.pm
index dbfa7bf..d36dbe3 100644
--- a/t/lib/browse.pm
+++ b/t/lib/browse.pm
@@ -14,7 +14,7 @@ use constant WINDOWS => eval { $^O =~ /Win32|cygwin/ };
 # failing miserably; considering that custom builds are very common
 # among CPAN testers, this could be considered a serious problem.
 #
-$ENV{PATH} = $Config{bin} . ':' . $ENV{PATH};
+$ENV{PATH} = $Config{bin} . (WINDOWS ? ';' : ':') . $ENV{PATH};
 
 sub browse {
     my %params = @_;

-- 
Alioth's /usr/local/bin/git-commit-notice on 
/srv/git.debian.org/git/pkg-perl/packages/libcgi-test-perl.git

_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits

Reply via email to