/[Grep]/lib/Grep/Source/Feed.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/Grep/Source/Feed.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 86 by dpavlin, Fri Feb 23 21:16:44 2007 UTC revision 99 by dpavlin, Sat Feb 24 12:32:09 2007 UTC
# Line 27  sub fetch { Line 27  sub fetch {
27          die $feed->title . " returned " . $r->status_line . " for $uri\n" unless ( $r->is_success );          die $feed->title . " returned " . $r->status_line . " for $uri\n" unless ( $r->is_success );
28          my $content = $r->content;          my $content = $r->content;
29    
30          $parent->save('feed.xml');          $parent->save('feed.xml', $content);
31    
32          die "No content returned from $uri\n" unless length( $content ) > 1;          die "No content returned from $uri\n" unless length( $content ) > 1;
33    
# Line 40  sub fetch { Line 40  sub fetch {
40    
41                  $parent->add_record(                  $parent->add_record(
42                          in_feed => $feed,                          in_feed => $feed,
43                          title => $entry->title,                          title => $entry->title || $entry->link,
44                          link => $entry->link,                          link => $entry->link,
45                          content => $entry->content->body,                          content => $entry->content->body,
46                          summary => $entry->summary->body,                          summary => $entry->summary->body,
Legend:
Removed from v.86  
changed lines
  Added in v.99
  ViewVC Help
Powered by ViewVC 1.1.26