#!/usr/bin/env perl use strict; use warnings; use Jifty::Test::Dist; use Jifty::Test::WWW::Mechanize; plan tests => 9; my $server = Jifty::Test->make_server; isa_ok( $server, 'Jifty::Server' ); my $URL = $server->started_ok; my $mech = Jifty::Test::WWW::Mechanize->new; $mech->get_ok( $URL . '/' , "testing template declare buffer" ); $mech->content_contains( 'content_contains( '' , "find page header" ); $mech->content_contains( '' ); $mech->content_contains( '' , "find page body" ); $mech->content_contains( '

TDPAGE

'); $mech->content_contains( '' );