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

Diff for /todotxt/Text-Todo-REST-API/t/response.t between version 1.2 and 1.4

version 1.2, 2010/01/26 05:47:30 version 1.4, 2010/02/13 22:15:29
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: response.t,v 1.1 2010/01/23 07:04:43 andrew Exp $  #     REVISION:  $AFresh1: response.t,v 1.3 2010/02/13 21:46:13 andrew Exp $
 #===============================================================================  #===============================================================================
   
 use strict;  use strict;
 use warnings;  use warnings;
   
 use Test::More tests => 61;  use Test::More tests => 101;
   
 my $class;  my $class;
   
Line 31 
Line 31 
         { text => 'dos', md5 => 'XXX md5 of dos XXX' },          { text => 'dos', md5 => 'XXX md5 of dos XXX' },
         { text => 'tre', md5 => 'XXX md5 of tre XXX' },          { text => 'tre', md5 => 'XXX md5 of tre XXX' },
     ],      ],
   
       tags  => [ 'delete', 'dos', 'uno' ],
     entry => { text => 'ety', md5 => 'XXX md5 of ety XXX' },      entry => { text => 'ety', md5 => 'XXX md5 of ety XXX' },
 );  );
   
Line 55 
Line 57 
                 '/^Unable to handle \[render_files\] for format \[md5\]/',                  '/^Unable to handle \[render_files\] for format \[md5\]/',
             content_type => 'text/plain',              content_type => 'text/plain',
         },          },
           json => {
               result       => '[]',
               data_result  => '["todo.txt"]',
               content_type => 'application/json',
           },
     },      },
   
     list => {      list => {
Line 75 
Line 82 
             ),              ),
             content_type => 'text/plain',              content_type => 'text/plain',
         },          },
           json => {
               result       => '[]',
               data_result  => '[{"text":"uno","md5":"XXX md5 of uno XXX"},{"text":"dos","md5":"XXX md5 of dos XXX"},{"text":"tre","md5":"XXX md5 of tre XXX"}]',
               content_type => 'application/json',
           },
     },      },
   
       tags => {
           undef => {
               result => '/^Unable to handle \[render_tags\] for format \[\]/',
           },
           text => {
               result       => undef,
               data_result  => ( join q{}, map "$_\n", @{ $data{tags} } ),
               content_type => 'text/plain',
           },
           md5 => {
               result      => undef,
               result => '/^Unable to handle \[render_tags\] for format \[md5\]/',
               content_type => 'text/plain',
           },
           json => {
               result       => '[]',
               data_result  => '["delete","dos","uno"]',
               content_type => 'application/json',
           },
       },
   
     entry => {      entry => {
         undef => {          undef => {
             result => '/^Unable to handle \[render_entry\] for format \[\]/',              result => '/^Unable to handle \[render_entry\] for format \[\]/',
Line 93 
Line 126 
                 $data{entry}                  $data{entry}
             ),              ),
             content_type => 'text/plain',              content_type => 'text/plain',
           },
           json => {
               result       => '[]',
               data_result  => '{"text":"ety","md5":"XXX md5 of ety XXX"}',
               content_type => 'application/json',
         },          },
     },      },
 );  );
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>