--- trunk/t/30-Frey-SVN.t	2008/12/10 22:49:31	804
+++ trunk/t/30-Frey-SVN.t	2008/12/10 23:12:36	806
@@ -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/;
@@ -18,3 +18,5 @@
 diag $markup if $debug;
 like( $markup, qr/blockquote/, 'markup content' );
 
+ok( my $codeswarm = $o->codeswarm_as_markup, 'codeswarm_as_markup' );
+diag $codeswarm if $debug;