===================================================================
RCS file: /cvs/todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API/Response.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API/Response.pm	2010/01/26 05:05:34	1.3
+++ todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API/Response.pm	2010/01/26 06:03:11	1.4
@@ -1,6 +1,6 @@
 package Text::Todo::REST::API::Response;
 
-# $AFresh1: Response.pm,v 1.2 2010/01/24 04:17:39 andrew Exp $
+# $AFresh1: Response.pm,v 1.3 2010/01/26 05:05:34 andrew Exp $
 
 use warnings;
 use strict;
@@ -30,7 +30,7 @@
         my $ident = ident($self);
 
         $format_of{$ident} = $options->{format} || '';
-        $data_of{$ident}   = $options->{data};
+        $data_of{$ident} = $options->{data};
 
         if ( $options->{type} ) {
             $type_of{$ident} = $options->{type};
@@ -50,7 +50,7 @@
     sub _handle_representation {
         my ( $self, $method, $options ) = @_;
 
-        if ($method ne 'content_type') {
+        if ( $method ne 'content_type' ) {
             $method = join q{_}, $method, $self->type;
         }