t/lib/TestApp/Plugin/AddDispatchTypes.pm

   1 package TestApp::Plugin::AddDispatchTypes;
   2 use strict;
   3 use warnings;
   4 use Class::C3;
   5
   6 sub setup_dispatcher {
   7     my $class = shift;
   8
   9     ### Load custom DispatchTypes, as done by Catalyst::Plugin::Server
  10     $class->next::method( @_ );
  11     $class->dispatcher->preload_dispatch_types(
  12         @{$class->dispatcher->preload_dispatch_types},
  13         qw/ +TestApp::DispatchType::CustomPreLoad /
  14     );
  15     $class->dispatcher->postload_dispatch_types(
  16         @{$class->dispatcher->postload_dispatch_types},
  17         qw/ +TestApp::DispatchType::CustomPostLoad /
  18     );
  19
  20     return $class;
  21 }
  22
  23 1;
  24