35 |
diag dump( @head ) if $debug; |
diag dump( @head ) if $debug; |
36 |
|
|
37 |
ok( $o->add_head( '/static/introspect.css' ), 'add_head css' ); |
ok( $o->add_head( '/static/introspect.css' ), 'add_head css' ); |
38 |
ok( $o->add_head( '<!-- head html -->' ), 'add_head html' ); |
ok( $o->add_head( "<!--\nhead html\n-->" ), 'add_head html' ); |
39 |
|
|
40 |
ok( my $html = $o->page( title => 'Test', body => '<!-- in-body -->' ), 'page' ); |
ok( my $html = $o->page( title => 'Test', body => '<!-- in-body -->' ), 'page' ); |
41 |
diag $html if $debug; |
diag $html if $debug; |