Parent Directory | Revision Log | Patch
revision 411 by dpavlin, Tue Nov 18 14:01:20 2008 UTC | revision 412 by dpavlin, Tue Nov 18 14:07:28 2008 UTC | |
---|---|---|
# | Line 88 sub class_meta { | Line 88 sub class_meta { |
88 | ||
89 | if ( ! $class->can('meta') ) { | if ( ! $class->can('meta') ) { |
90 | my $instance = Moose::Meta::Class->create_anon_class; | my $instance = Moose::Meta::Class->create_anon_class; |
91 | warn "class $class isn't Moose, faking anon class"; | warn "class $class isn't Moose, faking anon class" if $self->debug; |
92 | return ( $instance, 0 ); | return ( $instance, 0 ); |
93 | } | } |
94 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |