> diff -u index.cgi.in.orig index.cgi.in
--- index.cgi.in.orig   Sun Apr 24 08:57:09 2005
+++ index.cgi.in        Sun Apr 24 09:04:19 2005
@@ -182,6 +182,14 @@
     if ($y < 1970){
         $col->ReadRecent($HNS::System::DefaultMax);
     } else {
+       use HNS::Tools::HeadLine;
+       my $sectitle = new HNS::Tools::HeadLine;
+       $sectitle->getFileListByPattern($sectitle->diaryDir($y),"$y$m$d");
+       $sectitle->readHnf("d$y$m${d}.hnf", 'side');
+       my @new = @{$sectitle->title};
+       my $stitle = @new[$s];
+       $stitle =~ s/^.*>(.*)<\/a>$/$1/g;
+       $HNS::System::Title .= ' ' . $stitle;
         $col->Read($y, $m, $d);
     }
 }

GRP項目がある場合にずれるな:

        if ($grp eq '') {
                push(@title, $grp . $newHtml->AsHTML($templ, $params));
        };

「どーでもいいんですが、エントリごとのページを見ている時でも「以上、1 日分です。」と表示されてるのが、ちょっと気になりました。」:

$HNS::Collection::FootMessages{'HasContent'} = "以上です。\n";

%FootMessages =
    ('HasContent'=>"Diary for %num day(s)\n",
     'Section'=>"Diary of one section\n",
     'NoContent' =>"No Match\n");

    # Footer
    my $msg_type = $num ? 'HasContent' : 'NoContent';

    # Footer
	if ($num){
		if ($HNS::Diary::section){
			$msg_type = 'Section';
		} else{
			$msg_type = 'HasContent';
		}
	} else{
		$msg_type = 'NoContent';
	}

直った:

悪質spammerロリムトー氏と思われる者による正当な抵抗運動への不当な攻撃について_:

下ネタは難しいが、罵詈雑言は程度が低くて簡単:

Tanakayoshikazu.com: 「日本人にはBlogより日記」、はてなの人気に迫る_:

$Template{"ports"} = "http://www.freebsd.org/cgi/cvsweb.cgi/ports/%param/";

 LINK ports:net/ipv6_int net/ipv6_int

アジア諸国で合法的に制作された日本人歌手のＣＤなどが安価で逆輸入される問題も起こっているため、日本のレコード制作会社などに輸入の許諾権を与えて、逆輸入に歯止めをかける方策も検討する。