[Catalyst-commits] r13747 -
Catalyst-Runtime/5.80/trunk/lib/Catalyst/DispatchType
rafl at dev.catalyst.perl.org
rafl at dev.catalyst.perl.org
Fri Dec 3 12:30:23 GMT 2010
Author: rafl
Date: 2010-12-03 12:30:23 +0000 (Fri, 03 Dec 2010)
New Revision: 13747
Modified:
Catalyst-Runtime/5.80/trunk/lib/Catalyst/DispatchType/Chained.pm
Log:
Make the no-tabs test happy again
Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst/DispatchType/Chained.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst/DispatchType/Chained.pm 2010-12-03 12:25:25 UTC (rev 13746)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst/DispatchType/Chained.pm 2010-12-03 12:30:23 UTC (rev 13747)
@@ -198,7 +198,7 @@
splice( # and strip them off @parts as well
@parts, 0, scalar(@{[split('/', $try_part)]})
))); # @{[]} to avoid split to @_
- $found=1;
+ $found=1;
}
my @try_actions = @{$children->{$try_part}};
TRY_ACTION: foreach my $action (@try_actions) {
@@ -225,7 +225,7 @@
$#$action_parts < $#{$best_action->{parts}} ||
($#$action_parts == $#{$best_action->{parts}} &&
$#$captures < $#{$best_action->{captures}} && ($found > $best_action->{found})
- ))) {
+ ))) {
$best_action = {
actions => [ $action, @$actions ],
captures=> [ @captures, @$captures ],
More information about the Catalyst-commits
mailing list