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

Diff for /todotxt/Text-Todo-REST-API/t/GET/entry.t between version 1.9 and 1.10

version 1.9, 2010/01/31 03:10:39 version 1.10, 2010/02/13 21:48:28
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: entry.t,v 1.8 2010/01/26 06:03:11 andrew Exp $  #     REVISION:  $AFresh1: entry.t,v 1.9 2010/01/31 03:10:39 andrew Exp $
 #===============================================================================  #===============================================================================
   
 use strict;  use strict;
Line 45 
Line 45 
         is_deeply( $entry, $e, "Entry Matches" );          is_deeply( $entry, $e, "Entry Matches" );
   
         my $response;          my $response;
         ok( $response = $api->GET( '/todo_file/' . $e->{$type} ),          ok( $response = $api->GET( '/todo_file/entry/' . $e->{$type} ),
             "by $type GET($e->{$type})" );              "by $type GET($e->{$type})" );
         $entry = undef;          $entry = undef;
         ok( $entry = $response->data, 'Get data from response' );          ok( $entry = $response->data, 'Get data from response' );
Line 53 
Line 53 
   
         $response = undef;          $response = undef;
         ok( $response          ok( $response
                 = $api->GET( '/todo_file/' . $e->{$type} . '/done' ),                  = $api->GET( '/todo_file/entry/' . $e->{$type} . '/done' ),
             "by $type GET($e->{$type}/done)"              "by $type GET($e->{$type}/done)"
         );          );
         my ($should_be) = $e->{text} =~ /^(x)/xms;          my ($should_be) = $e->{text} =~ /^(x)/xms;

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

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