fix uninitialized warning in ACL

[catagits/Catalyst-Runtime.git] / lib / Catalyst.pm

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index 32d74dc..b51736d 100644 (file)
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -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,
             );
         }