メモ / 2007-07-07

■ chalow のコンテントネゴシエーション対応

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;
}

[ 固定リンク ]  [ トラックバック(0) ]