--- trunk/t/02-Frey-DBI-Sponge.t	2009/01/06 00:23:51	935
+++ trunk/t/02-Frey-DBI-Sponge.t	2009/01/06 11:56:28	936
@@ -4,7 +4,7 @@
 
 my $debug = @ARGV ? 1 : 0;
 
-use Test::More tests => 3;
+use Test::More tests => 4;
 use lib 'lib';
 
 use Data::Dump qw/dump/;
@@ -25,6 +25,7 @@
 		],
 	},
 ), 'new' );
-ok( my $data = $o->to_database_as_data, 'to_database' );
-diag dump( $data ) if $debug;
+ok( my $markup = $o->to_database_as_markup, 'to_database' );
+diag dump( $markup ) if $debug;
+like( $markup, qr/test/, 'markup' );