From b8b8bb3d166081a02c85ce4cb4f7c28aca2f2166 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Thu, 26 Nov 2009 18:11:34 +0100 Subject: add more tests --- t/lib/Identica.pm | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) create mode 100644 t/lib/Identica.pm (limited to 't/lib/Identica.pm') diff --git a/t/lib/Identica.pm b/t/lib/Identica.pm new file mode 100644 index 0000000..3772d03 --- /dev/null +++ b/t/lib/Identica.pm @@ -0,0 +1,24 @@ +package Identica; +use Moose; +use MooseX::Net::API; + +has [qw/api_username api_password/] => ( is => 'ro', isa => 'Str' ); + +net_api_declare identica => ( + base_url => 'http://identi.ca/api', + format => 'json', + format_mode => 'append', + authentication => 1, +); +net_api_method public_timeline => ( + path => '/statuses/public_timeline', + method => 'GET', +); + +net_api_method update_status => ( + path => '/statuses/update', + method => 'POST', + params => [qw/status/], + required => [qw/status/], + params_in_url => 1, +); -- cgit 1.4.1