From 05d803fdad9a28635f8b6e2ab5f33cbe659dd290 Mon Sep 17 00:00:00 2001 From: doy Date: Tue, 14 Apr 2009 23:29:09 -0500 Subject: comment fix --- lib/MooseX/NonMoose.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm index 5ab924b..35e960c 100644 --- a/lib/MooseX/NonMoose.pm +++ b/lib/MooseX/NonMoose.pm @@ -24,7 +24,7 @@ sub extends { # XXX: get constructor name from the constructor metaclass? my $super_new = $caller_meta->find_next_method_by_name('new'); - # if we're trying to extend a moose class, just do nothing + # if we're trying to extend a (non-immutable) moose class, just do nothing return if $super_new->package_name eq 'Moose::Object'; if ($super_new->associated_metaclass->can('constructor_class')) { -- cgit v1.2.3-54-g00ecf