[Catalyst-commits] r11863 -
Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst
zby at dev.catalyst.perl.org
zby at dev.catalyst.perl.org
Tue Nov 17 14:30:23 GMT 2009
Author: zby
Date: 2009-11-17 14:30:23 +0000 (Tue, 17 Nov 2009)
New Revision: 11863
Modified:
Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm
Log:
calling config on app object instead of context class (fix for t/live_stats.t )
Modified: Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm
===================================================================
--- Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm 2009-11-17 13:40:49 UTC (rev 11862)
+++ Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/lib/Catalyst/Context.pm 2009-11-17 14:30:23 UTC (rev 11863)
@@ -707,9 +707,8 @@
sub _stats_start_execute {
my ( $c, $code ) = @_;
- my $appclass = ref($c) || $c;
return if ( ( $code->name =~ /^_.*/ )
- && ( !$appclass->config->{show_internal_actions} ) );
+ && ( !$c->config->{show_internal_actions} ) );
my $action_name = $code->reverse();
$c->counter->{$action_name}++;
More information about the Catalyst-commits
mailing list