--- trunk/t/20-Frey-jQuery.t 2008/12/09 20:31:25 763 +++ trunk/t/20-Frey-jQuery.t 2009/01/02 13:22:13 908 @@ -4,7 +4,7 @@ my $debug = @ARGV ? 1 : 0; -use Test::More tests => 4; +use Test::More tests => 5; use lib 'lib'; use Data::Dump qw/dump/; @@ -17,11 +17,13 @@ package Mock; use Moose; extends 'Frey'; + with 'Frey::Web'; with 'Frey::jQuery'; } ok( my $o = Mock->new( debug => $debug ), 'new' ); -ok( my $markup = $o->as_markup, 'as_markup' ); -diag $markup if $debug; -like( $markup, qr/skeleton/, 'markup content' ); +ok( $o->depends, 'depends' ); +ok( my $head = join("\n", $o->head ), 'head' ); +diag $o->dump( $head ) if $debug; +like( $head, qr/jquery/, 'head has jquery content' );