t/aggregate/error_page_dump.t

   1 use strict;
   2 use warnings;
   3 use Test::More;
   4 use Test::Exception;
   5
   6 use Catalyst::Engine;
   7
   8 my $m = sub { Catalyst::Engine->_dump_error_page_element(@_) };
   9
  10 lives_ok { $m->('Scalar' => ['foo' => 'bar']) };
  11 lives_ok { $m->('Array' => ['foo' => []]) };
  12 lives_ok { $m->('Hash' => ['foo' => {}]) };
  13
  14 done_testing;
  15