[catagits/Catalyst-Runtime.git] / t / custom_exception_class_simple.t

#!/usr/bin/env perl

use strict;
use warnings;
use FindBin qw/$Bin/;
use lib "$Bin/lib";
use Test::More tests => 2;
use Test::Fatal;

is exception {
    require TestAppClassExceptionSimpleTest;
}, undef, 'Can load application';


is exception {
    Catalyst::Exception->throw
}, undef, 'throw is properly stubbed out';
Commit	Line	Data
08f9c848	1	#!/usr/bin/env perl
	2
	3	use strict;
	4	use warnings;
	5	use FindBin qw/$Bin/;
	6	use lib "$Bin/lib";
41a8bf1f	7	use Test::More tests => 2;
2a56ace9	8	use Test::Fatal;
08f9c848	9
2a56ace9	10	is exception {
08f9c848	11	require TestAppClassExceptionSimpleTest;
2a56ace9	12	}, undef, 'Can load application';
41a8bf1f	13
41a8bf1f	14
2a56ace9	15	is exception {
41a8bf1f	16	Catalyst::Exception->throw
2a56ace9	17	}, undef, 'throw is properly stubbed out';
41a8bf1f	18
	19
	20