From: Florian Ragwitz <rafl@debian.org>
Date: Thu, 28 Jul 2011 15:26:00 +0000 (+0200)
Subject: Merge branch 'master' into psgi
X-Git-Tag: 5.89003~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=39e8d5b4c30b661b124de07b517e9b672e683386;hp=d9d41c5af176289832bdb455ec18d3436cf69330

Merge branch 'master' into psgi

* master:
  Lion is like Snow Leopard when it comes to tar issues
  Warning fix
  Add _set_env writer to non-PSGI Catalyst
  Remove trailing whitespace

Conflicts:
	lib/Catalyst/Engine.pm
	lib/Catalyst/Engine/CGI.pm
---

diff --git a/lib/Catalyst/DispatchType/Chained.pm b/lib/Catalyst/DispatchType/Chained.pm
index 5ed6088..9c32258 100644
--- a/lib/Catalyst/DispatchType/Chained.pm
+++ b/lib/Catalyst/DispatchType/Chained.pm
@@ -203,7 +203,7 @@ sub recurse_match {
             if (my $capture_attr = $action->attributes->{CaptureArgs}) {
 
                 # Short-circuit if not enough remaining parts
-                next TRY_ACTION unless @parts >= $capture_attr->[0];
+                next TRY_ACTION unless @parts >= ($capture_attr->[0]||0);
 
                 my @captures;
                 my @parts = @parts; # localise
diff --git a/lib/Catalyst/DispatchType/Path.pm b/lib/Catalyst/DispatchType/Path.pm
index 4c23aaa..0578ff4 100644
--- a/lib/Catalyst/DispatchType/Path.pm
+++ b/lib/Catalyst/DispatchType/Path.pm
@@ -57,10 +57,10 @@ sub list {
         foreach my $action ( @{ $self->_paths->{$path} } ) {
             my $args  = $action->attributes->{Args}->[0];
             my $parts = defined($args) ? '/*' x $args : '/...';
-            
+
             my $display_path = "/$path/$parts";
             $display_path =~ s{/{1,}}{/}g;
-             
+
             $paths->row( $display_path, "/$action" );
         }
     }