[Catalyst-commits] r11514 - Catalyst-Runtime/5.80/trunk/lib

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2009-10-12 16:22:08 +0000 (Mon, 12 Oct 2009)
New Revision: 11514

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
Log:
better fix for uninitialized warning

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm	2009-10-12 16:18:22 UTC (rev 11513)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm	2009-10-12 16:22:08 UTC (rev 11514)
@@ -1634,7 +1634,7 @@
         if ( my $parent = $c->stack->[-1] ) {
             $c->stats->profile(
                 begin  => $action,
-                parent => "$parent" . ($c->counter->{"$parent"} || ''),
+                parent => "$parent" . ($c->counter->{"$parent"} || 0),
                 uid    => $uid,
             );
         }