X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FModel.pm;h=05c913f369f2582156328b91c3209fe7c8e86da8;hp=356745edac0707cf267ad69c393629a6c01c6c21;hb=38007d99db1774891d373242c86382e6f5cb083a;hpb=e8b9f2a92084b3b9dab6b2b879900481b8548b3b diff --git a/lib/Catalyst/Model.pm b/lib/Catalyst/Model.pm index 356745e..05c913f 100644 --- a/lib/Catalyst/Model.pm +++ b/lib/Catalyst/Model.pm @@ -1,7 +1,9 @@ package Catalyst::Model; -use strict; -use base qw/Catalyst::Component/; +use Moose; +extends qw/Catalyst::Component/; + +no Moose; =head1 NAME @@ -20,9 +22,9 @@ Catalyst Model base class. Implements the same methods as other Catalyst components, see L -=head1 AUTHOR +=head1 AUTHORS -Sebastian Riedel, C +Catalyst Contributors, see Catalyst.pm =head1 COPYRIGHT @@ -31,4 +33,6 @@ the same terms as Perl itself. =cut +__PACKAGE__->meta->make_immutable; + 1;