Changeset 453

Show
Ignore:
Timestamp:
04/01/06 15:52:08
Author:
daisuke
Message:

fix xango!

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/Makefile.PL

    r419 r453  
    5252        -default => 0, 
    5353        recommends('POE'), 
    54         recommends('Xango', 1.02), # avoid prep_request bug 
     54        recommends('Xango', 1.03), # avoid prep_request bug and enqueue bug 
    5555        recommends('XML::Feed', 0.08), 
    5656        recommends('Cache::FastMmap'), 
  • trunk/plagger/lib/Plagger/Plugin/Aggregator/Xango.pm

    r451 r453  
    99use POE; 
    1010use Xango::Broker::Push; 
    11 # sub Xango::DEBUG { 1 } # uncomment to get Xango debug messages 
     11# BEGIN { sub Xango::DEBUG { 1 } } # uncomment to get Xango debug messages 
    1212 
    1313sub register { 
     
    4040 
    4141    my $url = $args->{feed}->url; 
     42    return unless $url =~ m!^https?://!i; 
    4243    $context->log(info => "Fetch $url"); 
    4344    POE::Kernel->post($self->{xango_alias}, 'enqueue_job', Xango::Job->new(uri => URI->new($url), redirect => 0));