===================================================================
RCS file: /cvs/todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API.pm,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -r1.19 -r1.20
--- todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API.pm	2010/02/16 06:12:26	1.19
+++ todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API.pm	2010/04/30 00:04:29	1.20
@@ -1,6 +1,6 @@
 package Text::Todo::REST::API;
 
-# $AFresh1: API.pm,v 1.18 2010/02/13 21:48:28 andrew Exp $
+# $AFresh1: API.pm,v 1.19 2010/02/16 06:12:26 andrew Exp $
 
 use warnings;
 use strict;
@@ -196,25 +196,10 @@
         return %options;
     }
 
-    sub GET {
-        my ( $self, @args ) = @_;
-        return $self->_handle_action( 'GET', @args );
-    }
-
-    sub POST {
-        my ( $self, @args ) = @_;
-        return $self->_handle_action( 'POST', @args );
-    }
-
-    sub PUT {
-        my ( $self, @args ) = @_;
-        return $self->_handle_action( 'PUT', @args );
-    }
-
-    sub DELETE {
-        my ( $self, @args ) = @_;
-        return $self->_handle_action( 'DELETE', @args );
-    }
+    sub GET    { return shift->_handle_action( 'GET',    @_ ) }
+    sub POST   { return shift->_handle_action( 'POST',   @_ ) }
+    sub PUT    { return shift->_handle_action( 'PUT',    @_ ) }
+    sub DELETE { return shift->_handle_action( 'DELETE', @_ ) }
 
     sub fail {
         my ( $self, @message ) = @_;