todotxt/Text-Todo/t/list.t - diff

Return to list.t CVS log

Up to [local] / todotxt / Text-Todo / t

version 1.12, 2010/01/18 00:19:55

version 1.13, 2010/01/18 02:46:48

Line 26

diag("Testing entry $class $Text::Todo::VERSION");

my $orig = new_ok( $class => [{ todo_file => 't/todo.list.txt' }] );

my $orig = new_ok( $class, ['t/todo.list.txt'] );

my @orig_list;

ok( @orig_list = $orig->list, 'get orig list' );

Line 36

't/report.list.txt', 'orig report_file matches' );

my $todo_dir = tempdir( 'todo-XXXXXXXXX', CLEANUP => 1, TMPDIR => 1 );

my $copy = new_ok($class => []);

my $copy = new_ok($class);

foreach my $e (@orig_list) {

ok( $copy->add($e), 'add entry from orginal list' );