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