[catagits/Catalyst-Runtime.git] / trunk / t / aggregate / meta_method_unneeded.t

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