===================================================================
RCS file: /cvs/todotxt/Text-Todo-REST-API/t/response.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- todotxt/Text-Todo-REST-API/t/response.t	2010/02/13 21:46:13	1.3
+++ todotxt/Text-Todo-REST-API/t/response.t	2010/02/13 22:15:29	1.4
@@ -7,13 +7,13 @@
 #       AUTHOR:  Andrew Fresh (AAF), andrew@cpan.org
 #      COMPANY:  Red River Communications
 #      CREATED:  01/07/10 19:11
-#     REVISION:  $AFresh1: response.t,v 1.2 2010/01/26 05:47:30 andrew Exp $
+#     REVISION:  $AFresh1: response.t,v 1.3 2010/02/13 21:46:13 andrew Exp $
 #===============================================================================
 
 use strict;
 use warnings;
 
-use Test::More tests => 77;
+use Test::More tests => 101;
 
 my $class;
 
@@ -57,6 +57,11 @@
                 '/^Unable to handle \[render_files\] for format \[md5\]/',
             content_type => 'text/plain',
         },
+        json => {
+            result       => '[]',
+            data_result  => '["todo.txt"]',
+            content_type => 'application/json',
+        },
     },
 
     list => {
@@ -77,6 +82,11 @@
             ),
             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 => {
@@ -93,6 +103,11 @@
             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 => {
@@ -111,6 +126,11 @@
                 $data{entry}
             ),
             content_type => 'text/plain',
+        },
+        json => {
+            result       => '[]',
+            data_result  => '{"text":"ety","md5":"XXX md5 of ety XXX"}',
+            content_type => 'application/json',
         },
     },
 );