t/custom_exception_class_simple.t

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