[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