===================================================================
RCS file: /cvs/todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API/Actions/GET.pm,v
retrieving revision 1.4
retrieving revision 1.6
diff -u -r1.4 -r1.6
--- todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API/Actions/GET.pm	2010/02/14 06:14:57	1.4
+++ todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API/Actions/GET.pm	2010/02/18 05:34:31	1.6
@@ -1,6 +1,6 @@
 package Text::Todo::REST::API::Actions::GET;
 
-# $AFresh1: GET.pm,v 1.3 2010/02/13 21:48:28 andrew Exp $
+# $AFresh1: GET.pm,v 1.5 2010/02/16 04:09:53 andrew Exp $
 
 use warnings;
 use strict;
@@ -60,6 +60,7 @@
                 line => $line++,
                 md5  => md5_hex( $_->text ),
                 text => $_->text,
+                done => $_->done,
             },
             $todo->list );
         return \@list;
@@ -102,13 +103,7 @@
             $key = $key->[0];
         }
         elsif ( ref $key eq 'HASH' ) {
-            if ( exists $key->{$type} ) {
-                $key = $key->{$type};
-            }
-            else {
-                return $self->_fail(
-                    caller() . ' requires key [' . $type . ']' );
-            }
+            $key = $key->{$type};
         }
 
         return $key;