X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestPluginWithConstructor.pm;h=e251568be84e5d89bb7d185bce6d11bfee7125c3;hb=058e4074653139386299c58678cd852d10060056;hp=e5bdb1c372f7f377d34106bdd0860f393906172b;hpb=6a8f85af6d0032d3f6aecc0ce9420ceb523910b2;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestPluginWithConstructor.pm b/t/lib/TestPluginWithConstructor.pm index e5bdb1c..e251568 100644 --- a/t/lib/TestPluginWithConstructor.pm +++ b/t/lib/TestPluginWithConstructor.pm @@ -1,11 +1,17 @@ # See t/plugin_new_method_backcompat.t -package TestPluginWithConstructor; +package Class::Accessor::Fast; use strict; use warnings; + sub new { my $class = shift; return bless $_[0], $class; } +package TestPluginWithConstructor; +use strict; +use warnings; +use base qw/Class::Accessor::Fast/; + 1;