Commit | Line | Data |
239b5fc0 |
1 | use strict; |
2 | use warnings; |
3 | [% IF long_type == 'Controller' %][% IF mech %]use Test::More; |
4 | |
6fce1f9f |
5 | eval "use Test::WWW::Mechanize::Catalyst '[% name %]'"; |
0c34c8b8 |
6 | if ($@) { |
7 | plan skip_all => 'Test::WWW::Mechanize::Catalyst required'; |
7e6d9ba3 |
8 | exit 0; |
0c34c8b8 |
9 | } |
239b5fc0 |
10 | |
11 | ok( my $mech = Test::WWW::Mechanize::Catalyst->new, 'Created mech object' ); |
12 | |
13 | $mech->get_ok( 'http://localhost[% uri %]' ); |
65108673 |
14 | [%- ELSE %]use Test::More; |
239b5fc0 |
15 | |
41cebeb1 |
16 | BEGIN { use_ok 'Catalyst::Test', '[% app %]' } |
239b5fc0 |
17 | BEGIN { use_ok '[% class %]' } |
18 | |
19 | ok( request('[% uri %]')->is_success, 'Request should succeed' ); |
65108673 |
20 | [%- END -%] |
21 | [% ELSE %]use Test::More; |
239b5fc0 |
22 | |
23 | BEGIN { use_ok '[% class %]' } |
65108673 |
24 | [% END -%] |
0c34c8b8 |
25 | |
26 | done_testing(); |