| Subject: | [PATCH] Fix t/fast.t |
t/fast.t fails instead of skips if FCGI.pm is not available. The 'use
CGI::Fast' needs to be reverted to 'use_ok(CGI::Fast)', and the test
counts need to be adjusted accordingly.
The attached patch fixes all this.
| Subject: | cgi.patch |
--- CGI.pm-3.47/t/fast.t.orig 2009-09-10 13:10:06.288510500 -0400
+++ CGI.pm-3.47/t/fast.t 2009-09-10 13:11:41.398692700 -0400
@@ -7,16 +7,16 @@
$fcgi = $@ ? 0 : 1;
}
-use Test::More tests => 10;
+use Test::More tests => 11;
# Shut up "used only once" warnings.
() = $CGI::Q;
() = $CGI::Fast::Ext_Request;
SKIP: {
- skip( 'FCGI not installed, cannot continue', 7 ) unless $fcgi;
+ skip( 'FCGI not installed, cannot continue', 11 ) unless $fcgi;
- use CGI::Fast;
+ use_ok( CGI::Fast );
ok( my $q = CGI::Fast->new(), 'created new CGI::Fast object' );
is( $q, $CGI::Q, 'checking to see if the object was stored properly' );
is( $q->param(), (), 'no params' );