[Catalyst-commits] r9067 - in
Catalyst-Plugin-DebugCookie/1.000/trunk: . lib/Catalyst/Plugin
jgoulah at dev.catalyst.perl.org
jgoulah at dev.catalyst.perl.org
Mon Jan 12 04:29:00 GMT 2009
Author: jgoulah
Date: 2009-01-12 04:29:00 +0000 (Mon, 12 Jan 2009)
New Revision: 9067
Modified:
Catalyst-Plugin-DebugCookie/1.000/trunk/Changes
Catalyst-Plugin-DebugCookie/1.000/trunk/lib/Catalyst/Plugin/DebugCookie.pm
Log:
applying toms fix to make this work on 5.80
Modified: Catalyst-Plugin-DebugCookie/1.000/trunk/Changes
===================================================================
--- Catalyst-Plugin-DebugCookie/1.000/trunk/Changes 2009-01-12 03:53:22 UTC (rev 9066)
+++ Catalyst-Plugin-DebugCookie/1.000/trunk/Changes 2009-01-12 04:29:00 UTC (rev 9067)
@@ -1,3 +1,5 @@
+0.999003
+ - Fix to work correctly with Catalyst 5.80
0.999002 2008-10-02
- up Catalyst dep b/c this requires Catalyst::Stats
Modified: Catalyst-Plugin-DebugCookie/1.000/trunk/lib/Catalyst/Plugin/DebugCookie.pm
===================================================================
--- Catalyst-Plugin-DebugCookie/1.000/trunk/lib/Catalyst/Plugin/DebugCookie.pm 2009-01-12 03:53:22 UTC (rev 9066)
+++ Catalyst-Plugin-DebugCookie/1.000/trunk/lib/Catalyst/Plugin/DebugCookie.pm 2009-01-12 04:29:00 UTC (rev 9067)
@@ -6,7 +6,7 @@
use Class::C3;
use Catalyst::Plugin::DebugCookie::Util qw/check_debug_cookie_value/;
-our $VERSION = '0.999002';
+our $VERSION = '0.999003';
=head1 NAME
@@ -99,7 +99,7 @@
sub debug {
my $self = shift;
if (ref $self) {
- return $self->{debug} ||= $self->valid_debug_mode;
+ return $self->next::method(@_) || $self->valid_debug_mode;
} else {
$self->next::method(@_);
}
More information about the Catalyst-commits
mailing list