[BACK]Return to list.t CVS log [TXT][DIR] Up to [local] / todotxt / Text-Todo-REST-API / t / GET

Diff for /todotxt/Text-Todo-REST-API/t/GET/list.t between version 1.5 and 1.6

version 1.5, 2010/01/26 04:30:13 version 1.6, 2010/01/26 05:47:30
Line 7 
Line 7 
 #       AUTHOR:  Andrew Fresh (AAF), andrew@cpan.org  #       AUTHOR:  Andrew Fresh (AAF), andrew@cpan.org
 #      COMPANY:  Red River Communications  #      COMPANY:  Red River Communications
 #      CREATED:  01/07/10 19:11  #      CREATED:  01/07/10 19:11
 #     REVISION:  $AFresh1: list.t,v 1.4 2010/01/24 04:38:21 andrew Exp $  #     REVISION:  $AFresh1: list.t,v 1.5 2010/01/26 04:30:13 andrew Exp $
 #===============================================================================  #===============================================================================
   
 use strict;  use strict;
 use warnings;  use warnings;
   
 use Test::More tests => 23;  use Test::More tests => 59;
   
 my $api_class;  my $api_class;
 my $class;  my $class;
Line 64 
Line 64 
 is_deeply( $list, $list_should_be, 'check that we got the right list' );  is_deeply( $list, $list_should_be, 'check that we got the right list' );
   
 foreach my $arg (  foreach my $arg (
       { list => undef, action => 'list', args => [] },
   
     'todo_file', '/todo_file/list',      'todo_file', '/todo_file/list',
     { path => '/todo_file/list' },      { path => '/todo_file/list' },
     { list => 'todo_file', action => 'list', args => [] },      { list => 'todo_file', action => 'list', args => [] },
   
       'todo', '/todo/list',
       { path => '/todo/list' },
       { list => 'todo', action => 'list', args => [] },
   
       'todo.txt', '/todo.txt/list',
       { path => '/todo.txt/list' },
       { list => 'todo.txt', action => 'list', args => [] },
     )      )
 {  {
     my $response;      my $response;

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>