Perl x Open Food Facts Hackathon: Paris, France - May 24-25 Learn more

JJNAPIORK / Catalyst-Runtime-5.90059_001 / t / lib / TestAppClassExceptionSimpleTest.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

              
package TestAppClassExceptionSimpleTest::Exception;
use strict;
use warnings;
sub throw {}
#########
package TestAppClassExceptionSimpleTest;
use strict;
use warnings;
use Catalyst::Utils; #< some of the scripts use Catalyst::Utils before MyApp.pm
BEGIN { $Catalyst::Exception::CATALYST_EXCEPTION_CLASS = 'TestAppClassExceptionSimpleTest::Exception'; }
use Catalyst;
__PACKAGE__->setup;
1;