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=e358043c273f5f90f0a42b31ea935aff1daa134a;hb=6a226ee3384511ecfe42baf99ed67f9b90469b70;hpb=f1abcb4a7a3374b2e400b33b9cf5c0c6a5d49734 diff --git a/t/custom_exception_class_simple.t b/t/custom_exception_class_simple.t index e358043..27e4516 100644 --- a/t/custom_exception_class_simple.t +++ b/t/custom_exception_class_simple.t @@ -1,15 +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'; + -1;