diff options
| author | franck cuny <franck@lumberjaph.net> | 2009-12-20 16:10:33 +0100 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2009-12-20 16:10:33 +0100 |
| commit | af381fe8ee649310c0be5dc3696da816cf50b9db (patch) | |
| tree | 2b1025d810ab4283a74ab954fdfc4080c0fe5635 | |
| parent | update tests makefile pod and declaration (diff) | |
| download | net-backtype-af381fe8ee649310c0be5dc3696da816cf50b9db.tar.gz | |
update api_base_url attribute name
| -rw-r--r-- | lib/Net/Backtweet.pm | 8 | ||||
| -rw-r--r-- | lib/Net/Backtype.pm | 6 |
2 files changed, 7 insertions, 7 deletions
diff --git a/lib/Net/Backtweet.pm b/lib/Net/Backtweet.pm index ba84758..ea29a57 100644 --- a/lib/Net/Backtweet.pm +++ b/lib/Net/Backtweet.pm @@ -5,9 +5,9 @@ use MooseX::Net::API; extends 'Net::Backtype'; net_api_declare backtweet => ( - base_url => 'http://backtweets.com', - format => 'json', - format_mode => 'append', + api_base_url => 'http://backtweets.com', + format => 'json', + format_mode => 'append', ); net_api_method backtweet_search => ( @@ -28,7 +28,7 @@ Net::Backtweet - client for the backtweet API use Net::Backtweet; my $client = Net::Backtweet->new(); - my $res = $client->backtweet_search(q => 'http://lumberjaph.net', key => $mykey); + my $res = $client->backtweet_search(q => 'http://lumberjaph.net/', key => $mykey); =head1 DESCRIPTION diff --git a/lib/Net/Backtype.pm b/lib/Net/Backtype.pm index ac7816c..19ffcb3 100644 --- a/lib/Net/Backtype.pm +++ b/lib/Net/Backtype.pm @@ -6,9 +6,9 @@ use MooseX::Net::API; our $VERSION = '0.01'; net_api_declare backtype => ( - base_url => 'http://api.backtype.com', - format => 'json', - format_mode => 'append', + api_base_url => 'http://api.backtype.com', + format => 'json', + format_mode => 'append', ); net_api_method user_comments => ( |