From 530f2c7856392d5869694d8d334f83baa174bc69 Mon Sep 17 00:00:00 2001
From: Eugene Crosser <crosser@average.org>
Date: Mon, 27 Feb 2006 21:39:39 +0000
Subject: [PATCH] refer to index.html in subdirs

---
 mkindex.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/mkindex.pl b/mkindex.pl
index 5600ca3..bbdaca2 100755
--- a/mkindex.pl
+++ b/mkindex.pl
@@ -69,7 +69,8 @@ foreach my $yr(sort @years) {
 	for (my $mo=1;$mo<=12;$mo++) {
 		my $dir=sprintf "%04d/%02d",$yr,$mo;
 		if (-d $dir) {
-			print td({-bgcolor=>"#ffffc0"},a({-href=>$dir.'/'},$mn[$mo]));
+			print td({-bgcolor=>"#ffffc0"},
+				a({-href=>$dir.'/index.html'},$mn[$mo]));
 		} else {
 			print td({-bgcolor=>"#c0c0c0"},$mn[$mo]);
 		}
@@ -80,7 +81,7 @@ print end_table,p,"\n";
 
 print start_table({-cellspacing=>3}),"\n";
 foreach my $sub(sort @subdirs) {
-	print Tr(td({-bgcolor=>"#ffffc0"},a({-href=>$sub.'/'},$sub)));
+	print Tr(td({-bgcolor=>"#ffffc0"},a({-href=>$sub.'/index.html'},$sub)));
 }
 print end_table,"\n";
 
-- 
2.39.2