ref #12 - fix regexp on CGI::VERSION

replace crappy regexp with an equally crappy regexp (that works on this occasion)
leejo · Mar 8, 2015 · a44da92 · a44da92
1 parent 8dd3c99
commit a44da92
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/Changes b/Changes
@@ -1,6 +1,6 @@
 Revision history for CGI::Fast
 
-2.08 2015-03-08
+2.09 2015-03-08
     [DOCUMENTATION]
     - Clarify order of use statements when using both CGI and CGI::Fast
     - Replace indirect object notation with ->new

diff --git a/lib/CGI/Fast.pm b/lib/CGI/Fast.pm
@@ -13,7 +13,7 @@ local $^W = 1;
 # wish, but if you redistribute a modified version, please attach a note
 # listing the modifications you have made.
 
-$CGI::Fast::VERSION='2.08';
+$CGI::Fast::VERSION='2.09';
 
 use CGI;
 use FCGI;

diff --git a/t/009_imports.t b/t/009_imports.t
@@ -11,7 +11,7 @@ my $cgi_version = $CGI::VERSION;
 if ( ! $cgi_version ) {
 	plan skip_all => "Couldn't figure out CGI version";
 } else {
-	$cgi_version =~ s/\D.*$//;
+	$cgi_version =~ s/\.(\d+)\D.*$/.$1/;
 }
 
 if ( $cgi_version < 4.14 ) {