[Catalyst-commits] r10387 - in trunk/Catalyst-Controller-WrapCGI: .
lib/Catalyst/Controller lib/CatalystX t
caelum at dev.catalyst.perl.org
caelum at dev.catalyst.perl.org
Sat May 30 09:57:48 GMT 2009
Author: caelum
Date: 2009-05-30 09:57:47 +0000 (Sat, 30 May 2009)
New Revision: 10387
Modified:
trunk/Catalyst-Controller-WrapCGI/Changes
trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm
trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm
trunk/Catalyst-Controller-WrapCGI/lib/CatalystX/GlobalContext.pm
trunk/Catalyst-Controller-WrapCGI/t/wrap-cgi.t
Log:
skip test that depends on unreleased runtime
Modified: trunk/Catalyst-Controller-WrapCGI/Changes
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/Changes 2009-05-30 06:55:18 UTC (rev 10386)
+++ trunk/Catalyst-Controller-WrapCGI/Changes 2009-05-30 09:57:47 UTC (rev 10387)
@@ -1,5 +1,8 @@
Revision history for Catalyst-Controller-WrapCGI
+0.017 2009-05-30 09:56:43
+ - skip test that depends on unreleased runtime
+
0.016 2009-05-26 22:35:09
- fallback to $c->req->remote_user for $ENV{REMOTE_USER}
- fix POD
Modified: trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm 2009-05-30 06:55:18 UTC (rev 10386)
+++ trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm 2009-05-30 09:57:47 UTC (rev 10387)
@@ -23,11 +23,11 @@
=head1 VERSION
-Version 0.016
+Version 0.017
=cut
-our $VERSION = '0.016';
+our $VERSION = '0.017';
=head1 SYNOPSIS
Modified: trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm 2009-05-30 06:55:18 UTC (rev 10386)
+++ trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm 2009-05-30 09:57:47 UTC (rev 10387)
@@ -20,11 +20,11 @@
=head1 VERSION
-Version 0.016
+Version 0.017
=cut
-our $VERSION = '0.016';
+our $VERSION = '0.017';
=head1 SYNOPSIS
Modified: trunk/Catalyst-Controller-WrapCGI/lib/CatalystX/GlobalContext.pm
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/lib/CatalystX/GlobalContext.pm 2009-05-30 06:55:18 UTC (rev 10386)
+++ trunk/Catalyst-Controller-WrapCGI/lib/CatalystX/GlobalContext.pm 2009-05-30 09:57:47 UTC (rev 10387)
@@ -15,11 +15,11 @@
=head1 VERSION
-Version 0.016
+Version 0.017
=cut
-our $VERSION = '0.016';
+our $VERSION = '0.017';
=head1 SYNOPSIS
Modified: trunk/Catalyst-Controller-WrapCGI/t/wrap-cgi.t
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/t/wrap-cgi.t 2009-05-30 06:55:18 UTC (rev 10386)
+++ trunk/Catalyst-Controller-WrapCGI/t/wrap-cgi.t 2009-05-30 09:57:47 UTC (rev 10387)
@@ -53,6 +53,13 @@
is($response->content, '/cgi-bin/mtfnpy/test_scriptname.cgi',
'SCRIPT_NAME is correct');
-$ENV{REMOTE_USER} = 'TEST_USER';
-$response = request '/cgi-bin/test_remote_user.cgi';
-is($response->content, 'TEST_USER', 'REMOTE_USER was passed');
+SKIP: {
+ require Catalyst;
+
+ skip 'no $c->req->remote_user', 1
+ if $Catalyst::VERSION < 5.80005;
+
+ $ENV{REMOTE_USER} = 'TEST_USER';
+ $response = request '/cgi-bin/test_remote_user.cgi';
+ is($response->content, 'TEST_USER', 'REMOTE_USER was passed');
+}
More information about the Catalyst-commits
mailing list