- Need to reset the section marker for each new module.
- Should escape HTML in the log messges too :-)
my ($menu) = "$incdir/menu.inc" ;
# Section markers
-my ($sec) = 0;
my ($secwho) = 1;
my ($secfiles) = 2;
my ($seclog) = 3;
foreach my $module (@modules) {
my($firstentry) = 1;
+ my($sec) = 0;
print <<"END";
<div>
<h3>
@log = &trim_array(@log);
foreach my $logline (@log) {
$logline =~ s/^\t//;
- print "$logline\n";
+ print escapeHTML("$logline\n");
}
@log = ();
print <<"END";
@log = &trim_array(@log);
foreach my $logline (@log) {
$logline =~ s/^\t//;
- print "$logline\n";
+ print escapeHTML("$logline\n");
}
@log = ();
print <<"END";