2007-07-07
chalow が生成するリンクから拡張子を取り除いた。
datestr2url の部分を改造
sub datestr2anchor { my ($d) = @_; if ($page_mode == 2) { # アイテムモード $d =~ s!\[(\d{4}-\d\d-\d\d(-\d+)?)\]!<a href="$1">[$1]</a>!g; } elsif ($day_page_mode or $page_mode == 1) { # 日モード $d =~ s!\[((\d{4}-\d\d-\d\d)(-\d+)?)\]!<a href="$2#$1">[$1]</a>!g; } else { # 月モード $d =~ s!\[((\d{4}-\d\d)-\d\d(-\d+)?)\]!<a href="$2#$1">[$1]</a>!g; } return $d; }