X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcustom_exception_class_simple.t;h=084ea1121f1dbf43511ce14d977bab61b20064ab;hb=59b3e4d0df63749ee601113ce44be5b4340be2a8;hp=8c8c0c245a510575c043ae3d66685a774b21daf3;hpb=80e287baec94d765da86c3f208e8590a2b568060;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/custom_exception_class_simple.t b/t/custom_exception_class_simple.t
index 8c8c0c2..084ea11 100644
--- a/t/custom_exception_class_simple.t
+++ b/t/custom_exception_class_simple.t
@@ -1,12 +1,19 @@
-#!/usr/bin/env perl
-
+# HARNESS-NO-PRELOAD
 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';
+
+
+