ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/i-scream/web/cgi-bin/docs.cgi

Comparing web/cgi-bin/docs.cgi (file contents):
Revision 1.9 by tdb, Wed Mar 24 20:57:27 2004 UTC vs.
Revision 1.10 by tdb, Wed Mar 24 23:29:21 2004 UTC

#	Line 136 | Line 136 | my ($urls) = '(' . join ('|', qw{
136		# Print the contents of a file containing html
137		sub print_html ($) {
138		my ($filename) = @_;
139	+	my($virtual) = '<!--#include virtual="/cgi-bin/logo.cgi" -->';
140	+	my(@virtualresponse) = `/web/i-scream/nwww.cgi-bin/logo.cgi`;
141		open(FILE, $filename);
142		while(<FILE>) {
143	+	if(/$virtual/) {
144	+	s/$virtual/$virtualresponse[@virtualresponse-1]/;
145	+	}
146		print;
147		}
148		close FILE;

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines