lib/Catalyst/Base.pm

   1 package Catalyst::Base;
   2 use Moose;
   3 BEGIN { extends 'Catalyst::Controller' }
   4
   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
  10 no Moose;
  11
  12 1;
  13
  14 __END__
  15
  16 =head1 NAME
  17
  18 Catalyst::Base - Deprecated base class
  19
  20 =head1 DESCRIPTION
  21
  22 This used to be the base class for Catalyst Controllers. It
  23 remains here for compatibility reasons, but its use is highly deprecated.
  24
  25 If your application produces a warning, then please update your application to
  26 inherit from L<Catalyst::Controller> instead.
  27
  28 =head1 SEE ALSO
  29
  30 L<Catalyst>, L<Catalyst::Controller>.
  31
  32 =head1 AUTHORS
  33
  34 Catalyst Contributors, see Catalyst.pm
  35
  36 =head1 COPYRIGHT
  37
  38 This library is free software. You can redistribute it and/or modify it under
  39 the same terms as Perl itself.
  40
  41 =cut