Author: geoff Date: Tue Mar 15 08:31:18 2005 New Revision: 157559 URL: http://svn.apache.org/viewcvs?view=rev&rev=157559 Log: get version foo right
Modified: perl/modperl/branches/apache2-rename-unstable/Makefile.PL Modified: perl/modperl/branches/apache2-rename-unstable/Makefile.PL URL: http://svn.apache.org/viewcvs/perl/modperl/branches/apache2-rename-unstable/Makefile.PL?view=diff&r1=157558&r2=157559 ============================================================================== --- perl/modperl/branches/apache2-rename-unstable/Makefile.PL (original) +++ perl/modperl/branches/apache2-rename-unstable/Makefile.PL Tue Mar 15 08:31:18 2005 @@ -125,7 +125,7 @@ set_modperl_version(); if ($old_modperl_version) { - $old_modperl_version =~ s/(\d\d)(\d\d)/$1_$2/; + $old_modperl_version =~ s/(\d\d\d?)(\d\d)/$1_$2/; my $vstring = "mod_perl/$old_modperl_version"; print "$vstring installation detected..."; @@ -136,7 +136,7 @@ my $path = canonpath $old_modperl_pm; # XXX: doesn't handle relative paths yet # if PREFIX=/foo/bar is used, and it's not the same as the - # path where mod_perl < 1.99_22 is installed + # path where mod_perl < 1.999_22 is installed if ($prefix && $path !~ /^$prefix/) { print "ok (will install mod_perl/$VERSION into PREFIX=$prefix, " . "no collision)\n";