Changeset 915

Show
Ignore:
Timestamp:
06/07/06 16:29:50
Author:
miyagawa
Message:

Filter::TruePermalink?: revert $args support in rewrite. Revert back reddit.yaml

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/lib/Plagger/Plugin/Filter/TruePermalink.pm

    r760 r915  
    4949    my($self, $context, $args) = @_; 
    5050 
    51     $self->rewrite(sub { $args->{entry}->link }, sub { $args->{entry}->link(@_) }); 
     51    $self->rewrite(sub { $args->{entry}->link }, sub { $args->{entry}->link(@_) }, $args); 
    5252    for my $enclosure ($args->{entry}->enclosures) { 
    5353        $self->rewrite(sub { $enclosure->url }, sub { $enclosure->url( URI->new(@_) ) }); 
     
    5959 
    6060    my $loop; 
    61     while ($self->rewrite_link($getter, $callback)) { 
     61    while ($self->rewrite_link($getter, $callback, $args)) { 
    6262        if ($loop++ >= 100) { 
    6363            Plagger->error("Possible infinite loop on " . $getter->()); 
     
    6767 
    6868sub rewrite_link { 
    69     my($self, $getter, $callback) = @_; 
     69    my($self, $getter, $callback, $args) = @_; 
    7070 
    7171    my $context = Plagger->context;