]> i-scream Git - www.i-scream.org.git/commitdiff
Urg - now the image is generated using SSI the things that include the
authorTim Bishop <tim@bishnet.net>
Wed, 24 Mar 2004 23:29:21 +0000 (23:29 +0000)
committerTim Bishop <tim@bishnet.net>
Wed, 24 Mar 2004 23:29:21 +0000 (23:29 +0000)
include manually won't work. We can kludge these CGI's... but what about
the viewcvs stuff?

This needs a rethink.

cgi-bin/cvslog.cgi
cgi-bin/docs.cgi

index 004161e93000eefdfdb2bc10a2a0dfaad5e25883..01ee2bfabf732c52705f42dcc9a11882550699b2 100755 (executable)
@@ -291,8 +291,13 @@ exit 0;
 # Print the contents of a file containing html
 sub print_html {
     my ($filename) = @_;
+    my($virtual) = '<!--#include virtual="/cgi-bin/logo.cgi" -->';
+    my(@virtualresponse) = `/web/i-scream/nwww.cgi-bin/logo.cgi`;
     open(FILE, $filename);
     while(<FILE>) {
+        if(/$virtual/) {
+            s/$virtual/$virtualresponse[@virtualresponse-1]/;
+        }
         print;
     }
     close FILE;
index 479adc995d23bdcee3180bc504dddbf41d61c8e5..ee22b7b9ed4c8f05aeda8a797f03484ec286a06c 100755 (executable)
@@ -136,8 +136,13 @@ my ($urls) = '(' . join ('|', qw{
 # Print the contents of a file containing html
 sub print_html ($) {
     my ($filename) = @_;
+    my($virtual) = '<!--#include virtual="/cgi-bin/logo.cgi" -->';
+    my(@virtualresponse) = `/web/i-scream/nwww.cgi-bin/logo.cgi`;
     open(FILE, $filename);
     while(<FILE>) {
+        if(/$virtual/) {
+            s/$virtual/$virtualresponse[@virtualresponse-1]/;
+        }
         print;
     }
     close FILE;