Commit | Line | Data |
8edd9b70 |
1 | use FindBin; |
2 | use lib "$FindBin::Bin/lib"; |
d9d04ded |
3 | use Catalyst::Test 'TestApp', {default_host => 'default.com'}; |
4 | use Catalyst::Request; |
8edd9b70 |
5 | |
d9d04ded |
6 | use Test::More tests => 8; |
8edd9b70 |
7 | |
6cf9bf47 |
8 | content_like('/',qr/root/,'content check'); |
9 | action_ok('/','Action ok ok','normal action ok'); |
10 | action_redirect('/engine/response/redirect/one','redirect check'); |
11 | action_notfound('/engine/response/status/s404','notfound check'); |
d9d04ded |
12 | contenttype_is('/action/local/one','text/plain','Contenttype check'); |
13 | |
14 | my $creq; |
15 | my $req = '/dump/request'; |
16 | |
17 | { |
18 | eval '$creq = ' . request($req)->content; |
19 | is( $creq->uri->host, 'default.com', 'request targets default host set via import' ); |
20 | } |
21 | |
22 | { |
23 | local $Catalyst::Test::default_host = 'localized.com'; |
24 | eval '$creq = ' . request($req)->content; |
25 | is( $creq->uri->host, 'localized.com', 'target host is mutable via package var' ); |
26 | } |
27 | |
28 | { |
29 | my %opts = ( host => 'opthash.com' ); |
30 | eval '$creq = ' . request($req, \%opts)->content; |
31 | is( $creq->uri->host, $opts{host}, 'target host is mutable via options hashref' ); |
32 | } |