Commit | Line | Data |
7bd88b61 |
1 | use strict; |
2 | use warnings; |
3 | use Test::More tests => 5; |
4 | |
5 | use FindBin; |
6 | use lib "$FindBin::Bin/lib"; |
7 | |
8 | use_ok('Catalyst::Test', 'TestApp'); |
9 | |
10 | my $view = 'Classconfig'; |
11 | |
12 | my $response; |
13 | ok(($response = request("/test?view=$view"))->is_success, 'request ok'); |
14 | is($response->content, TestApp->config->{default_message}, 'message ok'); |
15 | |
16 | my $message = scalar localtime; |
17 | ok(($response = request("/test?view=$view&message=$message"))->is_success, 'request with message ok'); |
18 | is($response->content, $message, 'message ok') |