From: Tim Bishop <tim@bishnet.net>
Date: Wed, 24 Mar 2004 23:29:21 +0000 (+0000)
Subject: Urg - now the image is generated using SSI the things that include the
X-Git-Url: http://git.i-scream.org/?a=commitdiff_plain;h=dab5dbc565daac5f26e957130e49e29fc4d3cb6a;p=www.i-scream.org.git

Urg - now the image is generated using SSI the things that include the
include manually won't work. We can kludge these CGI's... but what about
the viewcvs stuff?

This needs a rethink.
---

diff --git a/cgi-bin/cvslog.cgi b/cgi-bin/cvslog.cgi
index 004161e..01ee2bf 100755
--- a/cgi-bin/cvslog.cgi
+++ b/cgi-bin/cvslog.cgi
@@ -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;
diff --git a/cgi-bin/docs.cgi b/cgi-bin/docs.cgi
index 479adc9..ee22b7b 100755
--- a/cgi-bin/docs.cgi
+++ b/cgi-bin/docs.cgi
@@ -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;