X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FClass.pm;h=67d903bce6829c0e88c495a5fc883bed4796643b;hb=e40935996d0c20aa345a46d996b76e771d885400;hp=2eb9312fbf87d33f4ea5459ab619971d3e8064a9;hpb=a3ca9754e1937ec96c99f56223c5f243b48779a3;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP/Class.pm b/lib/Class/MOP/Class.pm index 2eb9312..67d903b 100644 --- a/lib/Class/MOP/Class.pm +++ b/lib/Class/MOP/Class.pm @@ -763,7 +763,7 @@ sub get_all_attributes { sub superclasses { my $self = shift; - my $isa = $self->get_package_symbol( + my $isa = $self->get_or_add_package_symbol( { sigil => '@', type => 'ARRAY', name => 'ISA' } ); if (@_) {