X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FBase.pm;h=401f335f04c0ee73f99b3041684fcff0ba74e661;hb=480d94b5f34577816d44fe05389ca5a085179363;hp=6ef8fd3a1ab465beca5eeffea1a1b72871a04cbd;hpb=dec1adb07ece5c25d6e91cc3b1670ce22d12e445;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Base.pm b/lib/Catalyst/Base.pm index 6ef8fd3..401f335 100644 --- a/lib/Catalyst/Base.pm +++ b/lib/Catalyst/Base.pm @@ -1,13 +1,16 @@ package Catalyst::Base; use Moose; BEGIN { extends 'Catalyst::Controller' } -no Moose; after 'BUILD' => sub { my $self = shift; warn(ref($self) . " is using the deprecated Catalyst::Base, update your application as this will be removed in the next major release"); }; +no Moose; + +__PACKAGE__->meta->make_immutable; + 1; __END__ @@ -34,7 +37,7 @@ Catalyst Contributors, see Catalyst.pm =head1 COPYRIGHT -This program is free software, you can redistribute it and/or modify it under +This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself. =cut