[Bps-public-commit] r17440 - in Path-Dispatcher/trunk: lib/Path

sartak at bestpractical.com sartak at bestpractical.com
Tue Dec 30 14:20:27 EST 2008


Author: sartak
Date: Tue Dec 30 14:20:27 2008
New Revision: 17440

Modified:
   Path-Dispatcher/trunk/   (props changed)
   Path-Dispatcher/trunk/lib/Path/Dispatcher.pm

Log:
 r78058 at onn:  sartak | 2008-12-29 23:45:20 -0500
 Cleanup


Modified: Path-Dispatcher/trunk/lib/Path/Dispatcher.pm
==============================================================================
--- Path-Dispatcher/trunk/lib/Path/Dispatcher.pm	(original)
+++ Path-Dispatcher/trunk/lib/Path/Dispatcher.pm	Tue Dec 30 14:20:27 2008
@@ -30,6 +30,7 @@
     my $self = shift;
     my $path = shift;
 
+    # Automatically box string paths
     if (!ref($path)) {
         $path = $self->path_class->new(
             path => $path,
@@ -53,12 +54,10 @@
     my $self = shift;
     my %args = @_;
 
-    my @matches = $args{rule}->match($args{path})
-        or return 0;
-
+    my @matches = $args{rule}->match($args{path});
     $args{dispatch}->add_matches(@matches);
 
-    return 1;
+    return @matches;
 }
 
 sub run {



More information about the Bps-public-commit mailing list