From: Dave Rolsky Date: Fri, 22 May 2009 14:02:18 +0000 (-0500) Subject: More tidying of the test file X-Git-Tag: 0.80~73 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a5c5516fdaedcbd386ab3ee7c71f7500eb2c3c57;p=gitmo%2FMoose.git More tidying of the test file --- diff --git a/t/100_bugs/024_anon_method_metaclass.t b/t/100_bugs/024_anon_method_metaclass.t index ac3eb81..f895da5 100644 --- a/t/100_bugs/024_anon_method_metaclass.t +++ b/t/100_bugs/024_anon_method_metaclass.t @@ -20,16 +20,16 @@ my $method_meta = Moose::Meta::Class->create_anon_class( # For comparing identity without actually keeping $original_meta around my $original_meta = "$method_meta"; -my $method_class = $method_meta->name; +my $method_class = $method_meta->name; my $method_object = $method_class->wrap( - sub { 'ok' }, + sub {'ok'}, associated_metaclass => Ball->meta, package_name => 'Ball', name => 'bounce', ); -Ball->meta->add_method(bounce => $method_object); +Ball->meta->add_method( bounce => $method_object ); for ( 1, 2 ) { is( Ball->bounce, 'ok', "method still exists on Ball" );