]> iEval git - gruntmaster-page.git/blob - t/mech.t
Fix undef warning
[gruntmaster-page.git] / t / mech.t
1 #!/usr/bin/perl -w
2 use strict;
3 use warnings;
4
5 use Test::More;
6 BEGIN {
7 plan skip_all => '$ENV{AUTHOR_TESTING} is false, skipping tests' unless $ENV{AUTHOR_TESTING};
8 plan tests => 5;
9 }
10 use Test::WWW::Mechanize::PSGI;
11
12 my $mech = Test::WWW::Mechanize::PSGI->new(app => do 'app.psgi');
13 $mech->get_ok('/');
14 $mech->title_is('Gruntmaster 6000');
15
16 $mech->get_ok('/pb/');
17 $mech->title_is('Problems');
18 $mech->content_contains('Spell');
This page took 0.04925 seconds and 4 git commands to generate.