X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=66021fa57a8567a3dd53dc1a1ab4a730cce4aefa;hp=e4ff17899d885da0923cc27b445666f1559602d3;hb=def54ce2fbb6fe6a2c0e40e6866307f0e31bfa15;hpb=596677b657fca7a5bb47fab5cb081cd902dbee03 diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index e4ff178..66021fa 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -1271,8 +1271,8 @@ sub _stats_start_execute { # forward, locate the caller if ( my $parent = $c->stack->[-1] ) { - $c->stats->profile(begin => $action, - parent => "$parent" . $c->counter->{"$parent"}); + $c->stats->profile(begin => $action, + parent => "$parent" . $c->counter->{"$parent"}); } else { @@ -1281,9 +1281,9 @@ sub _stats_start_execute { } } else { - + # root-level call - $c->stats->profile(begin => $action); + $c->stats->profile(begin => $action); } return $action; @@ -2122,9 +2122,9 @@ sub setup_stats { my $env = Catalyst::Utils::env_value( $class, 'STATS' ); if ( defined($env) ? $env : ($stats || $class->debug ) ) { - no strict 'refs'; - *{"$class\::use_stats"} = sub { 1 }; - $class->log->debug('Statistics enabled'); + no strict 'refs'; + *{"$class\::use_stats"} = sub { 1 }; + $class->log->debug('Statistics enabled'); } }