section + push_if_first
my ($pkg, $path, $fn, $story_ref, $title_ref, $body_ref) = @_;
return unless $$story_ref;section が push_if_first より前に動いていることを前提にして、上のを story に付け加えた。
あ、push_if_first 側にいれました。素で書いてなかった。section が隠すエントリの $$story_ref を削除するので、それを見て if_first さんがしかとするように
そういえば filter でエントリ削除らないと、一日に何回も書いたとき paging 効きそうな予感。試してないけどうーん。結構めんどい
あと back_and_forth 相当の機能をつけないとなぁ。