From: Marius Gavrilescu Date: Sat, 15 Feb 2014 20:43:57 +0000 (+0200) Subject: Add example test suite X-Git-Url: http://git.ieval.ro/?p=gruntmaster-page.git;a=commitdiff_plain;h=b7bd0bad53df03baf5dc302ade58bea4f73d0880 Add example test suite --- diff --git a/t/mech.t b/t/mech.t new file mode 100644 index 0000000..5ea673b --- /dev/null +++ b/t/mech.t @@ -0,0 +1,14 @@ +#!/usr/bin/perl -w +use strict; +use warnings; + +use Test::More tests => 5; +use Test::WWW::Mechanize::PSGI; + +my $mech = Test::WWW::Mechanize::PSGI->new(app => do 'app.psgi'); +$mech->get_ok('/'); +$mech->title_is('Gruntmaster 6000'); + +$mech->get_ok('/pb/'); +$mech->title_is('Problems'); +$mech->content_contains('Spell');