From: Stephen L Johnson <sjohnson@monsters.org>
Date: Fri, 3 Mar 2000 03:13:11 +0000 (+0000)
Subject: added missing show() function
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=caaef2f6fc47d3b44ea28797523a4c104363b513;p=spong.git

added missing show() function
---

diff --git a/src/www-spong-ack.pl b/src/www-spong-ack.pl
index 655920e..e6b6649 100755
--- a/src/www-spong-ack.pl
+++ b/src/www-spong-ack.pl
@@ -358,6 +358,17 @@ sub header {
 sub footer { 
    &show( "footer" ) if -f "$main::WWWHTML/footer.html"; }
 
+sub show {
+   my $file = shift;
+   my $show = $main::WWWSPONG . "/help";
+
+   if( -f "$main::WWWHTML/$file.html" ) {
+      open( FILE, "$main::WWWHTML/$file.html" );
+      while( <FILE> ) { s/!!WWWSHOW!!/$show/g; print $_; }
+      close( FILE );
+   }
+}
+
 
 # Converts a command line representation of a host list to a list of hostnames