woopie2.pl

「woopie2.pl」の編集履歴(バックアップ)一覧はこちら

woopie2.pl」(2009/01/17 (土) 23:13:57) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

//perl # http://www.woopie.jp/feed/ranking/video sub init { my $self = shift; $self->{handle} = '/video/watch/\w+'; } sub find { my ($self, $args) = @_; my $uri = URI->new($args->{url}); my($video_id) = $uri =~ m!/video/watch/(\w+)! or return; my $enclosure = Plagger::Enclosure->new; $enclosure->url("http://www.woopie.jp/swf/ChannelPlayer-embed480.swf?video_id=$video_id"); $enclosure->type('application/x-shockwave-flash'); return $enclosure; } sub upgrade { my($self, $args) = @_; my $enclosure = $args->{enclosure}; return unless $enclosure->type eq 'application/x-shockwave-flash'; my $uri = URI->new($enclosure->url); unless ($uri->query_param('autostart')) { $enclosure->url($enclosure->url . "&autostart=1"); } $enclosure->width(480); $enclosure->height(400); }
//perl # http://www.woopie.jp/feed/ranking/video sub init { my $self = shift; $self->{handle} = 'video/watch/\w+'; } sub find { my ($self, $args) = @_; my $uri = URI->new($args->{url}); my($video_id) = $uri =~ m!/video/watch/(\w+)! or return; my $enclosure = Plagger::Enclosure->new; $enclosure->url("http://www.woopie.jp/swf/ChannelPlayer-embed480.swf?channel_id=$video_id"); $enclosure->type('application/x-shockwave-flash'); return $enclosure; } sub upgrade { my($self, $args) = @_; my $enclosure = $args->{enclosure}; return unless $enclosure->type eq 'application/x-shockwave-flash'; my $uri = URI->new($enclosure->url); unless ($uri->query_param('autostart')) { $enclosure->url($enclosure->url . "&autostart=1"); } $enclosure->width(480); $enclosure->height(400); }

表示オプション

横に並べて表示:
変化行の前後のみ表示:
ツールボックス

下から選んでください:

新しいページを作成する
ヘルプ / FAQ もご覧ください。