--- trunk/t/30-Frey-SVN.t	2008/12/10 22:49:31	804
+++ trunk/t/30-Frey-SVN.t	2009/01/02 16:56:42	909
@@ -4,17 +4,21 @@
 
 my $debug = @ARGV ? 1 : 0;
 
-use Test::More tests => 4;
+use Test::More tests => 7;
 use lib 'lib';
 
 use Data::Dump qw/dump/;
 
 BEGIN {
 	use_ok('Frey::SVN');
+	use_ok('Test::HTML::Lint');
 }
 
 ok( my $o = Frey::SVN->new( request_url => '/', debug => $debug ), 'new' );
 ok( my $markup = $o->as_markup, 'as_markup' );
 diag $markup if $debug;
-like( $markup, qr/blockquote/, 'markup content' );
+like( $markup, qr/commit/, 'markup content' );
+html_ok( $markup );
 
+ok( my $codeswarm = $o->codeswarm_as_markup, 'codeswarm_as_markup' );
+diag $codeswarm if $debug;