[Catalyst-commits] r10020 - in trunk/Catalyst-Controller-WrapCGI: . lib/Catalyst/Controller

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2009-05-05 19:47:13 +0000 (Tue, 05 May 2009)
New Revision: 10020

Modified:
   trunk/Catalyst-Controller-WrapCGI/Changes
   trunk/Catalyst-Controller-WrapCGI/MANIFEST.SKIP
   trunk/Catalyst-Controller-WrapCGI/Makefile.PL
   trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm
   trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm
Log:
C::C::WrapCGI - new release with fixed deps

Modified: trunk/Catalyst-Controller-WrapCGI/Changes
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/Changes	2009-05-05 19:40:17 UTC (rev 10019)
+++ trunk/Catalyst-Controller-WrapCGI/Changes	2009-05-05 19:47:13 UTC (rev 10020)
@@ -1,5 +1,8 @@
 Revision history for Catalyst-Controller-WrapCGI
 
+0.0036  2009-05-05 19:45:20
+    - fix deps (caelum)
+
 0.0035  2009-05-03 04:33:27
     - add a note about nph cgis not working (caelum)
 

Modified: trunk/Catalyst-Controller-WrapCGI/MANIFEST.SKIP
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/MANIFEST.SKIP	2009-05-05 19:40:17 UTC (rev 10019)
+++ trunk/Catalyst-Controller-WrapCGI/MANIFEST.SKIP	2009-05-05 19:47:13 UTC (rev 10020)
@@ -1,41 +1,5 @@
-# Avoid version control files.
-\bRCS\b
-\bCVS\b
-,v$
-\B\.svn\b
-
-# Avoid Makemaker generated and utility files.
-\bMakefile$
-\bblib
-\bMakeMaker-\d
-\bpm_to_blib$
-\bblibdirs$
-^MANIFEST\.SKIP$
-
-# Avoid Module::Build generated and utility files.
-\bBuild$
-\b_build
-
-# Avoid temp and backup files.
-~$
-\.tmp$
-\.old$
-\.bak$
-\#$
-\b\.#
-\.DS_Store$
-
-# Avoid Apache::Test files
-t/conf/apache_test_config.pm
-t/conf/extra.conf$
-t/conf/httpd.conf
-t/conf/mime.types
-t/htdocs
-t/logs
-t/var
-
-# No tarballs!
-\.gz$
-
-# Skip the roadmap
-lib/Catalyst/ROADMAP.pod
+# stolen from Devel::REPL
+^(?!script/|examples/|lib/|inc/|t/|Makefile.PL$|README$|MANIFEST$|Changes$|META.yml$)
+.svn/
+.git/
+.swp$

Modified: trunk/Catalyst-Controller-WrapCGI/Makefile.PL
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/Makefile.PL	2009-05-05 19:40:17 UTC (rev 10019)
+++ trunk/Catalyst-Controller-WrapCGI/Makefile.PL	2009-05-05 19:47:13 UTC (rev 10020)
@@ -9,8 +9,15 @@
 requires 'File::Find::Rule';
 requires 'List::MoreUtils';
 requires 'File::Slurp';
+requires 'URI' => '1.37';
+requires 'parent';
+requires 'namespace::clean';
+requires 'Task::Weaken';
+requires 'LWP';
+requires 'Moose';
 
 test_requires 'Catalyst::Plugin::Static::Simple';
+test_requires 'CGI';
 
 build_requires 'Test::More' => '0.86';
 

Modified: trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm	2009-05-05 19:40:17 UTC (rev 10019)
+++ trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/CGIBin.pm	2009-05-05 19:47:13 UTC (rev 10020)
@@ -23,11 +23,11 @@
 
 =head1 VERSION
 
-Version 0.013
+Version 0.014
 
 =cut
 
-our $VERSION = '0.013';
+our $VERSION = '0.014';
 
 =head1 SYNOPSIS
 

Modified: trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm
===================================================================
--- trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm	2009-05-05 19:40:17 UTC (rev 10019)
+++ trunk/Catalyst-Controller-WrapCGI/lib/Catalyst/Controller/WrapCGI.pm	2009-05-05 19:47:13 UTC (rev 10020)
@@ -20,11 +20,11 @@
 
 =head1 VERSION
 
-Version 0.0035
+Version 0.0036
 
 =cut
 
-our $VERSION = '0.0035';
+our $VERSION = '0.0036';
 
 =head1 SYNOPSIS
 
@@ -203,7 +203,9 @@
                ? eval { $c->user->obj->$username_field }
                 : '');
 
-  my $path_info = '/'.join '/' => map uri_escape_utf8($_), @{ $c->req->args };
+  my $path_info = '/'.join '/' => map {
+    utf8::is_utf8($_) ? uri_escape_utf8($_) : uri_escape($_)
+  } @{ $c->req->args };
 
   my $env = HTTP::Request::AsCGI->new(
               $req,
@@ -328,6 +330,7 @@
 
     for (0..1000) {
         print $_, br, "\n";
+        sleep 1;
     }
 
 because the coderef is executed synchronously with C<STDOUT> pointing to a temp