source: server/trunk/web/t/01app.t @ 420

#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;

BEGIN { use_ok 'Catalyst::Test', 'Sophie' }

ok( request('/')->is_success, 'Request should succeed' );

done_testing();