summaryrefslogtreecommitdiffstats
path: root/checksetup.pl
diff options
context:
space:
mode:
authorbbaetz%student.usyd.edu.au <>2002-10-26 10:56:55 +0200
committerbbaetz%student.usyd.edu.au <>2002-10-26 10:56:55 +0200
commit818ce46d9780c7a04ac04a3f116021f1edadd476 (patch)
tree37a73f7a26876a5690ca7f477c10ee3979689b07 /checksetup.pl
parent37993682fd10962e944a1e5bf9633c7b08ad49e6 (diff)
downloadbugzilla-818ce46d9780c7a04ac04a3f116021f1edadd476.tar.gz
bugzilla-818ce46d9780c7a04ac04a3f116021f1edadd476.tar.xz
Bug 147833 - start using CGI.pm
r=gerv, justdave
Diffstat (limited to 'checksetup.pl')
-rwxr-xr-xchecksetup.pl11
1 files changed, 9 insertions, 2 deletions
diff --git a/checksetup.pl b/checksetup.pl
index 9f22ae1f5..1acec457c 100755
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -179,6 +179,13 @@ sub have_vers {
$vnum = ${"${pkg}::VERSION"} || ${"${pkg}::Version"} || 0;
$vnum = -1 if $@;
+ # CGI's versioning scheme went 2.75, 2.751, 2.752, 2.753, 2.76
+ # That breaks the standard version tests, so we need to manually correct
+ # the version
+ if ($pkg eq 'CGI' && $vnum =~ /(2\.7\d)(\d+)/) {
+ $vnum = $1 . "." . $2;
+ }
+
if ($vnum eq "-1") { # string compare just in case it's non-numeric
$vstr = "not found";
}
@@ -201,8 +208,8 @@ my $modules = [
version => '1.52'
},
{
- name => 'CGI::Carp',
- version => '0'
+ name => 'CGI',
+ version => '2.88'
},
{
name => 'Data::Dumper',