diff options
Diffstat (limited to 'lib/MooseX/ABC.pm')
-rw-r--r-- | lib/MooseX/ABC.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/MooseX/ABC.pm b/lib/MooseX/ABC.pm index 11ec50b..6748acb 100644 --- a/lib/MooseX/ABC.pm +++ b/lib/MooseX/ABC.pm @@ -66,7 +66,9 @@ sub init_meta { my ($package, %options) = @_; Carp::confess("Can't make a role into an abstract base class") if Class::MOP::class_of($options{for_class})->isa('Moose::Meta::Role'); - goto $init_meta if $init_meta; + my $ret = $init_meta->(@_); + Class::MOP::class_of($options{for_class})->is_abstract(1); + return $ret; } =head1 TODO |