===================================================================
RCS file: /cvs/todotxt/Text-Todo/t/list.t,v
retrieving revision 1.8
retrieving revision 1.13
diff -u -r1.8 -r1.13
--- todotxt/Text-Todo/t/list.t	2010/01/10 22:39:26	1.8
+++ todotxt/Text-Todo/t/list.t	2010/01/18 02:46:48	1.13
@@ -8,7 +8,7 @@
 #       AUTHOR:  Andrew Fresh (AAF), andrew@cpan.org
 #      COMPANY:  Red River Communications
 #      CREATED:  01/07/10 19:11
-#     REVISION:  $RedRiver: list.t,v 1.7 2010/01/10 19:29:17 andrew Exp $
+#     REVISION:  $AFresh1: list.t,v 1.11 2010/01/15 19:50:15 andrew Exp $
 #===============================================================================
 
 use strict;
@@ -17,11 +17,12 @@
 use Test::More tests => 53;
 
 use File::Temp qw/ tempdir /;
-use Data::Dumper;
 
-my $class = 'Text::Todo';
-
-BEGIN: { use_ok( $class, "use $class" ) }
+my $class;
+BEGIN { 
+	$class = 'Text::Todo';
+	use_ok( $class, "use $class" ) 
+}
 
 diag("Testing entry $class $Text::Todo::VERSION");