Publish::Blosxom して blosxom にまかせるほうがいいのかなぁ。最初の一回だけ (インポートだけ) に Plagger 使う感じだけれど
日付内で番号ふって /2006/01/01/1 みたいな URL に対応させる blosxom プラグインを書けば解決するような気がしてきた。

• 今の URI を維持する
• データ移行
• ウェブ上から書けるインターフェイス (特定のタグがついたはてダセクションを Publish::Blosxom とかでもいいかも)
• Markdown とか Trac Wiki 記法とか選べる (meta プラグイン併用でそのまま記述したい)

ねｒ

このキーボード、Eが既に消えかけ

そうえば JS で $ 書くとき、$X って書いてるときがある。

駅前に高校生のカップルらしきものがいて、男がやたら偉そうでむかついた。女の子は笑っていたから、あれで幸せなんだろうな。
それはともかく電車内のぢょしこうせい濃度は今日も高めでよろしいですね。

りなざうのターミナルだと ssh してスクリーンができないなぁ。。

途中で Diary って名前がおかしい気がした。Archive とかかな

  - module: SmartFeed::Diary

  - module: Publish::XSLT
    rule:
      expression: $args->{feed}->type eq "smartfeed:diary"
    config:
      format: Atom
      dir: /home/cho45/tmp
      xsl: /home/cho45/diary.xsl
      extension: html

  - module: Publish::Diary
    config:
      sourcedir: /home/cho45/tmp
      dir: /home/cho45/public_html/diary

syntax error でまくりんぐ。もっといい方法があるんだろうなぁ。

それっぽい Subscription か CustomFeed とかを使って、Publish::XSLT で静的 HTML (に限らず) 生成の日記システムを妄想。
コメントとかは別の XML に保存して XSLT 中で document 使えば一応どうにかなるけれどちょっとやっぱキモいなぁ。
アーカイブしたいのは全部読み込まないと、漏れがでてしまうよなぁ。うーん。例えばはてダで書いたあるタグがついたセクションを、アーカイブに突っ込むという場合、最新のフィード何件か、っていう感じで配信されているから、上書きになっちゃうよなぁ。
あー、2006.atom とかを常に読み込むようにして、dedupe すればいけるかなぁ。

08/ 08.html ってあるとディレクトリ優先しちゃうのか。
08.html は 08/index.htm として保存しないとだめか

http://subtech.g.hatena.ne.jp/cho45/comment?date=20060906#c
コメントもらった！ ありまとう！ なるほど。
-f 付けると落ちることは落ちるけれど、プロセスが分離されて被害が少ないみたいだ。いちいち手動で起動しなくていい。よかたよかた。

silent exe "!GET 'http://nina:4321/reload' > /dev/null"

とかやってるのだけど、GET が遅いと入力が返ってこない。非同期で実行できるんだろうか。
と思ったけど

silent exe "!GET 'http://nina:4321/reload' > /dev/null &"

にした。

ああああ。body (bodfy と type して boofy と空目した) に % 指定がついてるせいだった。全部 px にかえてやる！！！！
これで4時間ぐらいハマった。やっぱ IE ＆ネットワークが重い環境だとこういう試行錯誤するしかないのはきつい。

C-z でどーんってやったあと、screen の window 移動して、「どこでやってたっけなぁ」ということが多々ある。window そのつど開けばいいんだろうけど、カレントディレクトリが云々。

Form.disable 相当のはないっぽいのかな。

寝てたら成城学園前に着く直前ぐらいから急にレベル7で腹痛が発動。しかたないので成城学園前で降りた。トイレが混んでて焦った……
いっかい出て、ホームに下りたところで再びレベル7.5で発動。またトイレへ、しかしまた混んでて（ｒｙ
なんか、起きたとき目の前にいた女の子が知り合いだった気がするけど気にしない。

package Plagger::Plugin::Publish::XSLT;

use strict;
use base qw( Plagger::Plugin::Publish::Feed );

use XML::LibXML;
use XML::LibXSLT;
use File::Spec;

our $stylesheet;

sub register {
	my ($self, $context) = @_;

	$self->SUPER::register($context);

	$context->register_hook(
		$self,
		'publish.feed' => \&publish_feed,
		'plugin.init'  => \&plugin_init,
	);
}

sub plugin_init {
	my ($self, $context, $args) = @_;

	my $xslt   = XML::LibXSLT->new();
	$context->log(debug => "loading " . $self->conf->{xsl} . " as StyleSheet");
	$stylesheet = $xslt->parse_stylesheet_file($self->conf->{xsl});
}

sub publish_feed {
	my ($self, $context, $args) = @_;

	$context->log(info => "XSLT processing Start..");
	my $f = $args->{feed};
	my $filepath = File::Spec->catfile($self->conf->{dir}, $self->gen_filename($f));

	my $parser = XML::LibXML->new();

	$context->log(debug => "loading $filepath as source XML");
	my $source = $parser->parse_file($filepath);

	my $result = $stylesheet->output_string( 
		$stylesheet->transform($source)
	);
	
	my $ext = $self->conf->{extension};
	$filepath =~ s/\..+?$/.$ext/;
	$context->log(info => "save feed for " . $f->link . " to $filepath");

	utf8::decode($result) unless utf8::is_utf8($result);
	open my $output, ">:utf8", $filepath or $context->error("$filepath: $!");
	print $output $result;
	close $output;
}

1;

  - module: Publish::XSLT
    config:
      format: Atom
      dir: /home/cho45/public_html/feeds/
      xsl: /home/cho45/test.xsl
      extension: html

とりあえずコピペと見よう見まねで Publish::XSLT だけ作ってみる。普通に TT で十分だからいらないなぁと思った。

継承でハマった。register_hook でフックを登録しているのだから、register で自分の分を登録して、SUPER で親クラスのを登録させないとだめだ。当たり前だ。

むしろ継承する意味あるんだろうか。load_plugin でいけるような。元の Feed も吐くから継承関係はいいといえばいいのかなぁ。そもそも元のフィードは吐くべきでない気がするけど

長かった。向ヶ丘遊園で初動・下北沢あたりからひどくなった。

Plagger でどっかに吐いてそれを自分のフィードに設定する。

a:hover 時にマージンだかなんだかが変わるバグでハマり中。全然わからない。手探りもいいとこだ

Use of uninitialized value in subroutine entry at /usr/lib/perl5/5.8.8/i386-linux-thread-multi/Socket.pm line 370.
Bad arg length for Socket::unpack_sockaddr_in, length is 0, should be 16 at /usr/lib/perl5/5.8.8/i386-linux-thread-multi/Socket.pm line 370.
exit 107

& が正常がなぜか置換されないため増殖する。なんでだろう。ちゃんと置換してるっぽいのに。

:echo substitute('&', '&', '&', 'g')

substitute('&', '&', '\&', 'g')

どうするのがいいかなぁ。SmartFeed::Diary は書いたけど、Publish をどうすればいいんだろう。ディレクトリ掘って保存するなら、Publish が頑張らないといけないだろうし、でもそこで XSLT もかましたい、とすると……
あー、プラグインで Publish のあとにさらに、Publish::Diary とか作って、保存済みの smartfeed_diary_\d{4}(_\d\d(_\d\d)?)? をリネームするやつを作ればいいのかな。やってみよう。