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

extends a non-Moose class

Thread Next
From:
Fayland Lam
Date:
February 7, 2009 06:16
Subject:
extends a non-Moose class
Message ID:
498D9797.6050206@gmail.com
$ cat test.pl
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 test.pl
The method 'bot_start' is not found in the inheritance hierarchy for class IRC::Bot2 at C:/strawberr
y/perl/site/lib/Class/MOP/Class.pm line 668
        Class::MOP::Class::__ANON__('Moose::Meta::Class=HASH(0x10fe65c)', 'bot_start') called at C:/
strawberry/perl/site/lib/Class/MOP/Class.pm 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/Util.pm line 170
        Moose::Util::add_method_modifier('IRC::Bot2', 'around', 'ARRAY(0x10fc7b4)') called at C:/str
awberry/perl/site/lib/Moose.pm line 101
        Moose::around(undef, 'bot_start') called at C:/strawberry/perl/site/lib/Moose/Exporter.pm li
ne 201
        Moose::around('bot_start', 'CODE(0xb2a20c)') called at test.pl line 21



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

Thanks.

-- 
Fayland Lam // http://www.fayland.org/ 
Foorum based on Catalyst // http://www.foorumbbs.com/ 


Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About