5 use lib "$FindBin::Bin/../lib";
8 use Catalyst::Test 'TestAppMVCWarnings';
10 if ( $ENV{CATALYST_SERVER} ) {
11 plan skip_all => 'Using remote server';
15 ok( request('http://localhost/view'), 'Request' );
16 like($TestAppMVCWarnings::log_messages[0], qr/Calling \$c->view\(\) is not supported/s, 'View failure warning received');
18 @TestAppMVCWarnings::log_messages = ();
20 ok( request('http://localhost/model'), 'Request' );
21 like($TestAppMVCWarnings::log_messages[0], qr/Calling \$c->model\(\) is not supported/s, 'Model failure warning received');