1234567891011121314151617 use strict;use warnings;use FindBin;use lib "$FindBin::Bin/../lib";use Test::More tests => 1;use Catalyst::Test 'TestApp';SKIP:{ if ( $ENV{CATALYST_SERVER} ) { skip "Using remote server", 1; } # Allow overriding automatic root. is( TestApp->config->{root}, '/some/dir' );}
use
strict;
warnings;
FindBin;
lib
"$FindBin::Bin/../lib"
;
Test::More
tests
=> 1;
Catalyst::Test
'TestApp'
SKIP:
{
if
(
$ENV
{CATALYST_SERVER} ) {
skip
"Using remote server"
, 1;
}
# Allow overriding automatic root.
is( TestApp->config->{root},
'/some/dir'
);