Commit | Line | Data |
---|---|---|
fc7ec1d9 | 1 | package Catalyst::Base; |
e5ecd5bc | 2 | use Moose; |
dec1adb0 | 3 | BEGIN { extends 'Catalyst::Controller' } |
0fc2d522 | 4 | no Moose; |
b7783788 | 5 | |
dec1adb0 | 6 | after 'BUILD' => sub { |
7 | my $self = shift; | |
8 | warn(ref($self) . " is using the deprecated Catalyst::Base, update your application as this will be removed in the next major release"); | |
9 | }; | |
10 | ||
234763d4 | 11 | 1; |
d70195d8 | 12 | |
234763d4 | 13 | __END__ |
2a563513 | 14 | |
aad72cc9 | 15 | =head1 NAME |
16 | ||
234763d4 | 17 | Catalyst::Base - Deprecated base class |
aad72cc9 | 18 | |
19 | =head1 DESCRIPTION | |
20 | ||
234763d4 | 21 | This used to be the base class for Catalyst Controllers. It |
dec1adb0 | 22 | remains here for compatibility reasons, but its use is highly deprecated. |
23 | ||
24 | If your application produces a warning, then please update your application to | |
25 | inherit from L<Catalyst::Controller> instead. | |
26d2c445 | 26 | |
fc7ec1d9 | 27 | =head1 SEE ALSO |
28 | ||
e7f1cf73 | 29 | L<Catalyst>, L<Catalyst::Controller>. |
fc7ec1d9 | 30 | |
2f381252 | 31 | =head1 AUTHORS |
fc7ec1d9 | 32 | |
2f381252 | 33 | Catalyst Contributors, see Catalyst.pm |
fc7ec1d9 | 34 | |
35 | =head1 COPYRIGHT | |
36 | ||
37 | This program is free software, you can redistribute it and/or modify it under | |
38 | the same terms as Perl itself. | |
39 | ||
e5ecd5bc | 40 | =cut |