X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FBase.pm;h=1dca5c91c7721684476005104b475c6869a18dfe;hb=009b5b2324f83396439a494a56684efb60eb2cd8;hp=cf410836f5982fb8f9d0faf95b2d3907894b549f;hpb=0fc2d522eec43202c21e9f0062e43f10db4d9008;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Base.pm b/lib/Catalyst/Base.pm index cf41083..1dca5c9 100644 --- a/lib/Catalyst/Base.pm +++ b/lib/Catalyst/Base.pm @@ -1,8 +1,12 @@ package Catalyst::Base; - -use Class::C3; use Moose; -BEGIN{ extends qw/Catalyst::Controller/ }; +BEGIN { extends 'Catalyst::Controller' } + +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; 1; @@ -16,21 +20,22 @@ Catalyst::Base - Deprecated base class =head1 DESCRIPTION This used to be the base class for Catalyst Controllers. It -remains here for compability reasons. +remains here for compatibility reasons, but its use is highly deprecated. + +If your application produces a warning, then please update your application to +inherit from L instead. =head1 SEE ALSO L, L. -=head1 AUTHOR +=head1 AUTHORS -Sebastian Riedel, C -Marcus Ramberg, C -Matt S Trout, C +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