~ubuntu-branches/ubuntu/precise/libcatalyst-view-tt-perl/precise

« back to all changes in this revision

Viewing changes to t/13classconfig.t

  • Committer: Bazaar Package Importer
  • Author(s): Jonathan Yu
  • Date: 2011-07-17 15:51:08 UTC
  • mfrom: (1.1.12 upstream) (3.1.9 sid)
  • Revision ID: james.westby@ubuntu.com-20110717155108-6i2oto0troyr6vgv
Tags: 0.37-1
* New upstream release
* Refresh copyright information
* Standards-Version 3.9.2 (no changes)
* Bump to debhelper 8

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
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')