From: | David Wheeler <dwheeler [...] cpan.org> |
Subject: | Weird Deaths |
Date: | Thu, 29 Dec 2005 21:39:35 -0800 |
To: | bug-template-timer [...] rt.cpan.org |
For some reason Template::Timer was suddenly die'ing on me at this line:
my $super = __PACKAGE__->can("SUPER::$sub") or die;
Shouldn't happen, right? Well, this patch fixes it, and is, I
believe, more correct, to boot
--- Timer.pm.old 2005-12-29 21:37:27.000000000 -0800
+++ Timer.pm 2005-12-29 21:37:31.000000000 -0800
@@ -60,7 +60,7 @@
foreach my $sub ( qw( process include ) ) {
no strict;
- my $super = __PACKAGE__->can("SUPER::$sub") or die;
+ my $super = __PACKAGE__->can($sub) or die;
*$sub = sub {
my $self = shift;
my $template = ref $_[0] eq 'ARRAY'
Thanks!
David