--- web/cgi-bin/cvslog.cgi 2004/03/24 20:57:27 1.31
+++ web/cgi-bin/cvslog.cgi 2004/03/24 23:29:21 1.33
@@ -58,7 +58,6 @@ my ($footer) = "$incdir/footer.inc";
my ($menu) = "$incdir/menu.inc" ;
# Section markers
-my ($sec) = 0;
my ($secwho) = 1;
my ($secfiles) = 2;
my ($seclog) = 3;
@@ -106,6 +105,7 @@ my(@modules) = split (/\s+/, $modulelist);
foreach my $module (@modules) {
my($firstentry) = 1;
+ my($sec) = 0;
print <<"END";
@@ -135,7 +135,7 @@ END
@log = &trim_array(@log);
foreach my $logline (@log) {
$logline =~ s/^\t//;
- print "$logline\n";
+ print escapeHTML("$logline\n");
}
@log = ();
print <<"END";
@@ -251,7 +251,7 @@ END
@log = &trim_array(@log);
foreach my $logline (@log) {
$logline =~ s/^\t//;
- print "$logline\n";
+ print escapeHTML("$logline\n");
}
@log = ();
print <<"END";
@@ -291,8 +291,13 @@ exit 0;
# Print the contents of a file containing html
sub print_html {
my ($filename) = @_;
+ my($virtual) = '';
+ my(@virtualresponse) = `/web/i-scream/nwww.cgi-bin/logo.cgi`;
open(FILE, $filename);
while() {
+ if(/$virtual/) {
+ s/$virtual/$virtualresponse[@virtualresponse-1]/;
+ }
print;
}
close FILE;