X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fcustom_exception_class_simple.t;h=27e451621223924c87f0fd0b67268164b799b0ca;hp=8c8c0c245a510575c043ae3d66685a774b21daf3;hb=82010ea176741c7a4f2baf3f6f27377b1d9f6b15;hpb=80e287baec94d765da86c3f208e8590a2b568060 diff --git a/t/custom_exception_class_simple.t b/t/custom_exception_class_simple.t index 8c8c0c2..27e4516 100644 --- a/t/custom_exception_class_simple.t +++ b/t/custom_exception_class_simple.t @@ -1,12 +1,18 @@ -#!/usr/bin/env perl - use strict; use warnings; use FindBin qw/$Bin/; use lib "$Bin/lib"; -use Test::More tests => 1; -use Test::Exception; +use Test::More tests => 2; +use Test::Fatal; -lives_ok { +is exception { require TestAppClassExceptionSimpleTest; -} 'Can load application'; +}, undef, 'Can load application'; + + +is exception { + Catalyst::Exception->throw +}, undef, 'throw is properly stubbed out'; + + +