| 55 |  | my ($style) = "$incdir/style.inc"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 56 |  | my ($header) = "$incdir/header.inc"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 57 |  | my ($footer) = "$incdir/footer.inc"; | 
 
 
 
 
 
 
 
 
 
 
 | 58 | < | my ($menu) = "$incdir/menu.inc" ; | 
 
 
 
 
 
 
 
 
 | 58 | > | my ($menu) = "$incdir/menu-static.inc" ; | 
 
 
 
 
 
 
 
 
 
 
 | 59 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 60 |  | # Section markers | 
 
 
 
 
 
 
 
 
 | 61 | – | my ($sec) = 0; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 61 |  | my ($secwho) = 1; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 62 |  | my ($secfiles) = 2; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 63 |  | my ($seclog) = 3; | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 105 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 106 |  | foreach my $module (@modules) { | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 107 |  | my($firstentry) = 1; | 
 
 
 
 
 
 
 
 | 108 | + | my($sec) = 0; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 109 |  | print <<"END"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 110 |  | <div> | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 111 |  | <h3> | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 135 |  | @log = &trim_array(@log); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 136 |  | foreach my $logline (@log) { | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 137 |  | $logline =~ s/^\t//; | 
 
 
 
 
 
 
 
 
 
 
 | 138 | < | print "$logline\n"; | 
 
 
 
 
 
 
 
 
 | 138 | > | print escapeHTML("$logline\n"); | 
 
 
 
 
 
 
 
 
 
 
 | 139 |  | } | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 140 |  | @log = (); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 141 |  | print <<"END"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 251 |  | @log = &trim_array(@log); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 252 |  | foreach my $logline (@log) { | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 253 |  | $logline =~ s/^\t//; | 
 
 
 
 
 
 
 
 
 
 
 | 254 | < | print "$logline\n"; | 
 
 
 
 
 
 
 
 
 | 254 | > | print escapeHTML("$logline\n"); | 
 
 
 
 
 
 
 
 
 
 
 | 255 |  | } | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 256 |  | @log = (); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 257 |  | print <<"END"; |