From ddccfb58d6052c48d0e68827c2b4bbb29eea5665 Mon Sep 17 00:00:00 2001 From: Tim Bishop Date: Sun, 18 May 2003 19:04:39 +0000 Subject: [PATCH] Fix minor perl bug. --- cgi-bin/cvslog.cgi | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) 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'); -- 2.44.0