From: Tim Bishop <tim@bishnet.net>
Date: Sun, 18 May 2003 19:04:39 +0000 (+0000)
Subject: Fix minor perl bug.
X-Git-Tag: PRE_WWW_REDESIGN~48
X-Git-Url: http://git.i-scream.org/?a=commitdiff_plain;h=ddccfb58d6052c48d0e68827c2b4bbb29eea5665;hp=436e5671ed66121185308a687b8828b93df8a7c4;p=www.i-scream.org.git

Fix minor perl bug.
---

diff --git a/cgi-bin/cvslog.cgi b/cgi-bin/cvslog.cgi
index 5d542c7..80e22a8 100755
--- a/cgi-bin/cvslog.cgi
+++ b/cgi-bin/cvslog.cgi
@@ -14,8 +14,7 @@ if($period eq "days") {
     if ($days < 1) {$days = 1};
     $heading = "i-scream CVS$moduleext commits in the past $days day(s)";
     $days--;
-    $days .= "d"; # because we can't write "$daysd" below :-)
-    $firstdate = ">" . `/bin/date -v-$days +%Y/%m/%d`;
+    $firstdate = ">" . `/bin/date -v-${days}d +%Y/%m/%d`;
 }
 elsif($period eq "date") {
     my($date)=$query->param('date');