1 |
tove 09/09/10 20:40:31 |
2 |
|
3 |
Added: 3.47-fcgi.patch |
4 |
Log: |
5 |
Version bump |
6 |
(Portage version: 2.2_rc40/cvs/Linux x86_64) |
7 |
|
8 |
Revision Changes Path |
9 |
1.1 perl-core/CGI/files/3.47-fcgi.patch |
10 |
|
11 |
file : http://sources.gentoo.org/viewcvs.py/gentoo-x86/perl-core/CGI/files/3.47-fcgi.patch?rev=1.1&view=markup |
12 |
plain: http://sources.gentoo.org/viewcvs.py/gentoo-x86/perl-core/CGI/files/3.47-fcgi.patch?rev=1.1&content-type=text/plain |
13 |
|
14 |
Index: 3.47-fcgi.patch |
15 |
=================================================================== |
16 |
http://rt.cpan.org/Public/Bug/Display.html?id=49599 |
17 |
|
18 |
--- CGI.pm-3.47/t/fast.t |
19 |
+++ CGI.pm-3.47/t/fast.t |
20 |
@@ -7,16 +7,16 @@ |
21 |
$fcgi = $@ ? 0 : 1; |
22 |
} |
23 |
|
24 |
-use Test::More tests => 10; |
25 |
+use Test::More tests => 11; |
26 |
|
27 |
# Shut up "used only once" warnings. |
28 |
() = $CGI::Q; |
29 |
() = $CGI::Fast::Ext_Request; |
30 |
|
31 |
SKIP: { |
32 |
- skip( 'FCGI not installed, cannot continue', 7 ) unless $fcgi; |
33 |
+ skip( 'FCGI not installed, cannot continue', 11 ) unless $fcgi; |
34 |
|
35 |
- use CGI::Fast; |
36 |
+ use_ok( CGI::Fast ); |
37 |
ok( my $q = CGI::Fast->new(), 'created new CGI::Fast object' ); |
38 |
is( $q, $CGI::Q, 'checking to see if the object was stored properly' ); |
39 |
is( $q->param(), (), 'no params' ); |