--- trunk/t/03-frey-pod.t	2008/11/18 10:35:27	404
+++ trunk/t/03-frey-pod.t	2008/11/18 11:45:15	405
@@ -4,7 +4,7 @@
 
 my $debug = @ARGV ? 1 : 0;
 
-use Test::More tests => 5;
+use Test::More tests => 7;
 use lib 'lib';
 
 use Data::Dump qw/dump/;
@@ -21,3 +21,8 @@
 diag $h if $debug;
 
 like( $h, qr/Frey::Pod/, 'found me' );
+
+ok( my @h = $o->markup('Frey::Pod'), 'markup' );
+diag dump( @h ) if $debug;
+isa_ok( \@h, 'ARRAY' );
+