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

[sartak at bestpractical.com]

Author: sartak
Date: Wed Nov 19 17:22:06 2008
New Revision: 16942

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

Log:
 r75840 at onn:  sartak | 2008-11-19 17:14:27 -0500
 Don't include the stringified rule if we have a name


Modified: Path-Dispatcher/trunk/lib/Path/Dispatcher/Rule.pm
==============================================================================
--- Path-Dispatcher/trunk/lib/Path/Dispatcher/Rule.pm	(original)
+++ Path-Dispatcher/trunk/lib/Path/Dispatcher/Rule.pm	Wed Nov 19 17:22:06 2008
@@ -79,8 +79,13 @@
     my $path  = $match ? $match->path->path : $args{path}->path;
 
     # name
-    my $trace = "$self";
-    $trace .= " (" . $self->name . ")" if $self->has_name;
+    my $trace = '';
+    if ($self->has_name) {
+        $trace .= $self->name;
+    }
+    else {
+        $trace .= "$self";
+    }
 
     # attributes such as tokens or regex
     my $attr = $self->readable_attributes;