SweetPotato::Plagger

■ [Filter] Filter::AbsolutizeEntryIcon

Filter::AbsolutizeEntryLinkのアイコン版。エントリのアイコンURLが相対URLならば，それをエントリのURLでもって絶対化する。

Plagger/Plugin/Filter/AbsolutizeEntryIcon.pm

package Plagger::Plugin::Filter::AbsolutizeEntryIcon;
use strict;
use base qw( Plagger::Plugin );

use URI;

sub register {
    my ($self, $context) = @_;
    $context->register_hook(
        $self,
        'update.entry.fixup' => \&filter,
    );
}

sub filter {
    my ($self, $context, $args) = @_;
    return unless $args->{entry}->icon
               && $args->{entry}->icon->{url}
               && $args->{entry}->icon->{url} !~ m!^https?://!;
    $args->{entry}->icon({url => URI->new_abs($args->{entry}->icon->{url}, $args->{entry}->link)});
}

1;

関連

• Filter::AbsolutizeEntryLink - SweetPotato::Plagger - Plaggerグループ