stas 2004/09/17 13:21:45
Modified: t/lib/TestAPRlib finfo.pm util.pm
Log:
fix the requirements for the minimal apache version (was asking for a
specific version before)
Revision Changes Path
1.3 +2 -2 modperl-2.0/t/lib/TestAPRlib/finfo.pm
Index: finfo.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/lib/TestAPRlib/finfo.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -u -r1.2 -r1.3
--- finfo.pm 24 Jul 2004 01:42:42 -0000 1.2
+++ finfo.pm 17 Sep 2004 20:21:45 -0000 1.3
@@ -10,7 +10,7 @@
use constant WIN32 => Apache::TestConfig::WIN32;
use constant OSX => Apache::TestConfig::OSX;
-use constant APACHE_2_0_49 => have_apache_version('2.0.49');
+use constant APACHE_2_0_49_PLUS => have_min_apache_version('2.0.49');
use File::Spec::Functions qw(catfile);
use Fcntl qw(:mode);
@@ -92,7 +92,7 @@
# tests for stuff not in perl's stat
{
# BACK_COMPAT_MARKER - fixed as of 2.0.49.
- if (WIN32 && !APACHE_2_0_49) {
+ if (WIN32 && !APACHE_2_0_49_PLUS) {
skip "finfo.fname requires Apache 2.0.49 or later", 0;
}
else {
1.2 +1 -1 modperl-2.0/t/lib/TestAPRlib/util.pm
Index: util.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/lib/TestAPRlib/util.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -u -r1.1 -r1.2
--- util.pm 15 Jul 2004 15:32:32 -0000 1.1
+++ util.pm 17 Sep 2004 20:21:45 -0000 1.2
@@ -22,7 +22,7 @@
);
# BACK_COMPAT_MARKER (sha1 support added in 2.0.50)
-delete $hashes{sha1} unless have_apache_version('2.0.50');
+delete $hashes{sha1} unless have_min_apache_version('2.0.50');
sub num_of_tests {
return 1 + scalar keys %hashes;
