Changeset 466

Show
Ignore:
Timestamp:
04/01/06 22:30:40
Author:
miyagawa
Message:

workaround for URI::Fetch content-type bug

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm

    r434 r466  
    2727    my $res = $self->fetch_content($url) or return; 
    2828 
    29     if ( $Feed::Find::IsFeed{$res->http_response->content_type} ) { 
     29    my $content_type = eval { $res->content_type } || 
     30                       $res->http_response->content_type || 
     31                       "text/xml"; # xxx! 
     32 
     33    if ( $Feed::Find::IsFeed{$content_type} ) { 
    3034        $self->handle_feed($url, \$res->content); 
    3135    } else {