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=e87ed80dbe96e0181d3b028446e24900bc257b0e;hb=518b61984c49533ec00813125b16812cd681e778;hpb=5c6d829db5bd01e575b11b00c1ea26d5888d9bf0

diff --git a/t/custom_exception_class_simple.t b/t/custom_exception_class_simple.t
index e87ed80..27e4516 100644
--- a/t/custom_exception_class_simple.t
+++ b/t/custom_exception_class_simple.t
@@ -1,18 +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;
-
-TODO: {
-    local $TODO = 'Does not work yet';
+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';
+
 
-}