From 45f5ac4cafb3222dfd7f49b135012cac53e7529e Mon Sep 17 00:00:00 2001
From: franck cuny <franck@lumberjaph.net>
Date: Wed, 15 Sep 2010 11:15:10 +0200
Subject: add pod

---
 lib/Net/HTTP/Spore.pm | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'lib/Net/HTTP')

diff --git a/lib/Net/HTTP/Spore.pm b/lib/Net/HTTP/Spore.pm
index 127754f..b70bd31 100644
--- a/lib/Net/HTTP/Spore.pm
+++ b/lib/Net/HTTP/Spore.pm
@@ -78,9 +78,8 @@ sub _add_methods {
     $client->enable('Format::JSON');
 
     my $timeline = $client->public_timeline(format => 'json');
-    if ($timeline->status == 200) {
-        my $tweets = $timeline->body;
-        foreach my $tweet (@$tweets) {
+    my $tweets = $timeline->body;
+    foreach my $tweet (@$tweets) {
             print $tweet->{user}->{screen_name}. " says ".$tweet->{text}."\n";
         }
     }
@@ -89,11 +88,13 @@ sub _add_methods {
 
 =head1 DESCRIPTION
 
-
 =head2 METHODS
 
 =over 4
 
-=item B<new_from_spec>($specification_file, %args)
+=item new_from_spec($specification_file, %args
+
+Create and return a L<Net::HTTP::Spore::Core> object, with methods
+generated from the specification file.
 
 =back
-- 
cgit v1.2.3