]> i-scream Git - www.i-scream.org.git/blobdiff - cgi-bin/docs.cgi
Update CGI's to know about new site.
[www.i-scream.org.git] / cgi-bin / docs.cgi
index ee22b7b9ed4c8f05aeda8a797f03484ec286a06c..2d7703aa9b923503918a582984cff1c8f9ce69bb 100755 (executable)
@@ -6,14 +6,14 @@ use CGI;
 $| = 1;
 
 # Settings
-my ($incdir) = "../nwww";
+my ($incdir) = "../htdocs";
 
 # Include files
 my ($doctype) = "$incdir/doctype.inc";
 my ($style) = "$incdir/style.inc";
 my ($header) = "$incdir/header.inc";
 my ($footer) = "$incdir/footer.inc";
-my ($menu) = "$incdir/menu.inc" ;
+my ($menu) = "$incdir/menu-static.inc" ;
 
 my ($query) = new CGI;
 
@@ -136,13 +136,8 @@ 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;