--- trunk/t/02-frey-session.t	2008/11/19 15:28:23	455
+++ trunk/t/02-frey-session.t	2008/12/04 18:33:25	718
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 12;
+use Test::More tests => 15;
 use lib 'lib';
 
 use Data::Dump qw/dump/;
@@ -10,7 +10,7 @@
 my $debug = @ARGV ? 1 : 0;
 
 BEGIN {
-	use_ok('Frey::Web');
+	use_ok('Frey::Session');
 }
 
 {
@@ -30,5 +30,12 @@
 	cmp_ok( $o->usage->{test}, '=', 42, "read $nr" );
 }
 
-ok( my $data = $o->as_data, 'data' );
+ok( my $data = $o->session_as_data, 'session_as_data' );
 diag $data if $debug;
+
+ok( $o->TODO( "test,ignore" ), 'TODO' );
+
+ok( defined( $o->bugs->{TODO} ), 'TODO' );
+ok( my $todo = $o->bugs->{TODO}->{"test,ignore"}, 'have test,ignore' );
+
+diag dump( $todo );