From: Tim Bishop <tim@bishnet.net>
Date: Wed, 13 Jun 2001 15:29:51 +0000 (+0000)
Subject: Now accepts a module in the query string, should that be preferable.
X-Git-Tag: PRE_WWW_REDESIGN~114
X-Git-Url: http://git.i-scream.org/?a=commitdiff_plain;h=872c513dd3693fb17182836575d59d1b67c99b47;hp=76941663038178f07eabbd9914be5a51289a8840;p=www.i-scream.org.git

Now accepts a module in the query string, should that be preferable.
---

diff --git a/cgi-bin/cvslog.cgi b/cgi-bin/cvslog.cgi
index a420de4..4538f6c 100755
--- a/cgi-bin/cvslog.cgi
+++ b/cgi-bin/cvslog.cgi
@@ -46,13 +46,14 @@ print <<"END";
 <a href="http://www.i-scream.org.uk"><img border="0" src="../i-scream.gif"></a>
 
 <h2>$heading</h2>
-<p>&nbsp;</p>
 
 END
 
 print `$updatecmd`;
 
-my $modulelist = `ls $cvsroot`;
+my($modulelist)=$query->param('module');
+$modulelist = `ls $cvsroot` unless defined $modulelist;
+
 my(@modules) = split (/\s+/, $modulelist);
 
 foreach my $module (@modules) {