From: Tim Bishop 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;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');