fix uninitialized warning in ACL
Rafael Kitover [Mon, 12 Oct 2009 16:18:22 +0000 (16:18 +0000)]
lib/Catalyst.pm

index 32d74dc..b51736d 100644 (file)
@@ -1634,7 +1634,7 @@ sub _stats_start_execute {
         if ( my $parent = $c->stack->[-1] ) {
             $c->stats->profile(
                 begin  => $action,
-                parent => "$parent" . $c->counter->{"$parent"},
+                parent => "$parent" . ($c->counter->{"$parent"} || ''),
                 uid    => $uid,
             );
         }