Changeset 635
- Timestamp:
- 04/21/06 01:56:52
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm
r583 r635 31 31 "text/xml"; 32 32 33 if ( $Feed::Find::IsFeed{$content_type} ) { 34 $self->handle_feed($url, \$res->content); 33 my $content = $res->content; 34 if ( $Feed::Find::IsFeed{$content_type} || $self->looks_like_feed(\$content) ) 35 $self->handle_feed($url, \$content); 35 36 } else { 36 my @feeds = Feed::Find->find_in_html(\$ res->content, $url);37 my @feeds = Feed::Find->find_in_html(\$content, $url); 37 38 if (@feeds) { 38 39 $url = $feeds[0]; … … 45 46 46 47 return 1; 48 } 49 50 sub looks_like_feed { 51 my($self, $content_ref) = @_; 52 $$content_ref =~ m!<rss version="|<rdf:RDF xmlns="http://purl\.org/rss|<feed xmlns="!; 47 53 } 48 54
