|
|
@ -349,7 +349,7 @@ sub year_print { |
|
|
|
"^[0-9]{1,2}\$"); |
|
|
|
|
|
|
|
$result .= "\n<table>\n"; |
|
|
|
my $update_count; |
|
|
|
my $update_count = 0; # explicitly define for later printing. |
|
|
|
foreach my $month_file (@month_files) { |
|
|
|
my @update_files = dir_list ("$DISPLAY_CONF{ROOT_DIR}/$year/$month_file", |
|
|
|
"low_to_high", "^[0-9]{1,2}\$"); |
|
|
|