perl/apache2-mod_perl
SHA256
8
0
Fork 0
forked from pool/apache2-mod_perl
Code Pull Requests Activity

Accepting request 34173 from Apache:Modules

Browse Source 
Copy from Apache:Modules/apache2-mod_perl based on submit request 34173 from user coolo

OBS-URL: https://build.opensuse.org/request/show/34173
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/apache2-mod_perl?expand=0&rev=8
This commit is contained in:
OBS User autobuild
2010-03-05 15:31:13 +00:00
committed by Git OBS Bridge
parent 13d8e14b55
commit ccce4d0e21
3 changed files with 39 additions and 187 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
apache2-mod_perl-2.0.4-tests.diff
View File

@@ -1,6 +1,8 @@
--- t/hooks/authen_basic.t
+++ t/hooks/authen_basic.t
@@ -4,7 +4,7 @@
Index: t/hooks/authen_basic.t
===================================================================
--- t/hooks/authen_basic.t.orig 2007-11-12 06:34:00.000000000 +0100
+++ t/hooks/authen_basic.t 2010-03-05 12:38:56.000000000 +0100
@@ -4,7 +4,7 @@ use warnings FATAL => 'all';
use Apache::Test;
use Apache::TestRequest;
@@ -9,7 +11,7 @@
my $location = "/TestHooks__authen_basic";
@@ -17,13 +17,13 @@
@@ -17,13 +17,13 @@ sok {
$rc == 401;
};
@@ -30,9 +32,11 @@
--- t/hooks/authz.t
+++ t/hooks/authz.t
@@ -4,7 +4,7 @@
Index: t/hooks/authz.t
===================================================================
--- t/hooks/authz.t.orig 2007-11-12 06:34:00.000000000 +0100
+++ t/hooks/authz.t 2010-03-05 12:38:56.000000000 +0100
@@ -4,7 +4,7 @@ use warnings FATAL => 'all';
use Apache::Test;
use Apache::TestRequest;
@@ -41,7 +45,7 @@
my $location = "/TestHooks__authz";
@@ -14,8 +14,8 @@
@@ -14,8 +14,8 @@ my $rc = GET_RC $location;
ok $rc == 401;
@@ -52,3 +56,15 @@
+#ok ! GET_OK $location, username => 'jobbob', password => 'whatever';
Index: Apache-Test/lib/Apache/TestConfig.pm
===================================================================
--- Apache-Test/lib/Apache/TestConfig.pm.orig 2007-12-31 08:50:45.000000000 +0100
+++ Apache-Test/lib/Apache/TestConfig.pm 2010-03-05 12:39:35.000000000 +0100
@@ -1769,6 +1769,7 @@ sub apxs {
# return an untainted PATH
sub untaint_path {
my $path = shift;
+ return $path unless defined $path;
($path) = ( $path =~ /(.*)/ );
# win32 uses ';' for a path separator, assume others use ':'
my $sep = WIN32 ? ';' : ':';