X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FModel.pm;h=f573770e84a5c940d787af618b479804e8e5c5d8;hb=2ef599586739f410da035904753378000a368a44;hp=f56b31f2658431ed2c91d3ddc2324680086490af;hpb=5ee249f25d549a71fdb509af9d99151f62cddab8;p=catagits%2FCatalyst-Runtime.git

diff --git a/lib/Catalyst/Model.pm b/lib/Catalyst/Model.pm
index f56b31f..f573770 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
 
@@ -15,6 +17,11 @@ See L<Catalyst>.
 
 Catalyst Model base class.
 
+=head1 METHODS
+
+Implements the same methods as other Catalyst components, see
+L<Catalyst::Component>
+
 =head1 AUTHOR
 
 Sebastian Riedel, C<sri@oook.de>
@@ -26,4 +33,6 @@ the same terms as Perl itself.
 
 =cut
 
+__PACKAGE__->meta->make_immutable;
+
 1;