otsune's SnakeOil

mattnさんのPublish::GooBookmarkにツッコミ

plagger |

Gooブックマーク用plagger pluginをmattnさんが書いてた。

Sbox Error

（robots.txtによって非公開でしかブックマークできないあたりの分岐処理をしようとして放置してたんだよな）

んで気に成った所をツッコミしてたらコメント欄だと長くなったのでこっちに書く。

my $tag_string = @tags ? join(',', @tags) : '';

タグに,が含まれると分離してしまうという # XXX な状況が。（XXX←これって、たいていうごくよ。って意味だっけ？）

map{ tr/,/_/ } @tags; # separator as comma in goo bookmark
my $tag_string = @tags ? join(',', @tags) : '';

とかしてるけど、これもこれでアレな気配はするな。

タグのデリミタを吸収して相互交換できるPlagger::Tag::delimitarなんちゃらmethodってのがあってもいいのか？

point       => $self->conf->{rate} || 1,

Plagger::Entryにはrateというアクセサが有るので

point       =>  ($args->{entry}->rate || $self->conf->{default_rate} || 1),

とかのほうがいいかも。（rate使ってるのってほとんどないけど）

publicno    => 0,

これはオレが飽きて放り出した箇所で。

gooブックマークにブックマークするPerlスクリプト - M.C.P.C.でも指摘がある通り、robots.txtによってpublicno => 2じゃないと登録できないエントリーがあったりする。mechのfind_all_inputsでform_name publicnoのradioの有無を引っ掛けるのが良いのか？

あと

my $publicno = $self->conf->{default_publicno} || 0;

でconfigからデフォルト弄れるといいかも。