[catagits/Catalyst-Runtime.git] / t / engine / setup / basics.t

#!perl

use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/../../lib";

use Test::More tests => 1;
use Catalyst::Test 'TestApp';

{
  # Allow overriding automatic root.
  is(TestApp->config->{root},'/Users/chansen/src/MyApp/root');
}
Commit	Line	Data
3882a476	1	#!perl
	2
	3	use strict;
	4	use warnings;
	5
	6	use FindBin;
	7	use lib "$FindBin::Bin/../../lib";
	8
	9	use Test::More tests => 1;
	10	use Catalyst::Test 'TestApp';
	11
	12	{
	13	# Allow overriding automatic root.
	14	is(TestApp->config->{root},'/Users/chansen/src/MyApp/root');
	15	}