develooper Front page | perl.moose | Postings from February 2009

extends a non-Moose class

Thread Next
Fayland Lam
February 7, 2009 06:16
extends a non-Moose class
Message ID:
$ cat
package IRC::Bot2;

use Moose;
extends 'IRC::Bot';

after 'bot_start' => sub {
    my $self = shift;

    no warnings; 
    $IRC::Bot::log =  IRC::Bot::Log2->new(
        Path          => $self->{'LogPath'},
        split_channel => 1,
        split_day     => 1,
$ perl
The method 'bot_start' is not found in the inheritance hierarchy for class IRC::Bot2 at C:/strawberr
y/perl/site/lib/Class/MOP/ line 668
        Class::MOP::Class::__ANON__('Moose::Meta::Class=HASH(0x10fe65c)', 'bot_start') called at C:/
strawberry/perl/site/lib/Class/MOP/ line 708
        Class::MOP::Class::add_around_method_modifier('Moose::Meta::Class=HASH(0x10fe65c)', 'bot_sta
rt', 'CODE(0xb2a20c)') called at C:/strawberry/perl/site/lib/Moose/ line 170
        Moose::Util::add_method_modifier('IRC::Bot2', 'around', 'ARRAY(0x10fc7b4)') called at C:/str
awberry/perl/site/lib/ line 101
        Moose::around(undef, 'bot_start') called at C:/strawberry/perl/site/lib/Moose/ li
ne 201
        Moose::around('bot_start', 'CODE(0xb2a20c)') called at line 21

the code is working with Moose 0.57 but not 0.68.
anything changed?


Fayland Lam // 
Foorum based on Catalyst // 

Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About