From: Eugene Crosser Date: Tue, 28 Feb 2006 21:22:14 +0000 (+0000) Subject: make year clickable too X-Git-Tag: 1.0~16 X-Git-Url: http://www.average.org/gitweb/?p=mkgallery.git;a=commitdiff_plain;h=c6bfb2dbe01ce301c05578fda92c3b97dad62faf make year clickable too --- diff --git a/mkindex.pl b/mkindex.pl index bbdaca2..cdce048 100755 --- a/mkindex.pl +++ b/mkindex.pl @@ -65,7 +65,8 @@ print h1("Gallery Index"),"\n"; print start_table({-cellspacing=>3}),"\n"; foreach my $yr(sort @years) { print start_Tr,"\n"; - print td({-bgcolor=>"#ffc0ff"},$yr); + print td({-bgcolor=>"#ffc0ff"}, + a({-href=>$yr.'/index.html'},$yr)); for (my $mo=1;$mo<=12;$mo++) { my $dir=sprintf "%04d/%02d",$yr,$mo; if (-d $dir) {