1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
use strict;
use warnings;
use FindBin qw/$Bin/;
use lib "$Bin/../lib";
use Test::More tests => 1;
use Test::Exception;
use Carp ();
# Doing various silly things, like for example
# use CGI qw/:standard/ in your conrtoller / app
# will overwrite your meta method, therefore Catalyst
# can't depend on it being there correctly.
# This is/was demonstrated by Catalyst::Controller::WrapCGI
# and Catalyst::Plugin::Cache::Curried
use Catalyst::Test 'TestAppWithMeta';
ok( request('/')->is_success );
|
