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');
$modulelist =~ s/[\r\n]/ /gm;
my($cvs2clpath) = "/usr/local/bin/cvs2cl";
-my($cvs2clargs) = "--stdout --no-wrap -r -t -w -S -U $cvsroot/CVSROOT/users -l \"-d'$firstdate'\" -g \"-d$cvsroot\" -g \"-Q\"";
+my($cvs2clargs) = "--stdout --no-wrap --no-common-dir -r -t -w -S -U $cvsroot/CVSROOT/users -l \"-d'$firstdate'\" -g \"-d$cvsroot\" -g \"-Q\"";
my($updatecmd) = "/home/iscream/bin/fullcvsupdate.sh $modulelist";
my($logcmd) = "cd /tmp/i-scream/cvstmp && $cvs2clpath $cvs2clargs";
print "\n<font color=\"blue\">\n<b>";
print HTML_encode($1);
print "</b>\n<i>";
- print " commited by <a href=\"mailto:$3\" style=\"text-decoration: none;\">";
+ print " committed by <a href=\"mailto:$3\" style=\"text-decoration: none;\">";
print HTML_encode("$2");
print "</a></i>\n</font>\n"
}
print "\n<font color=\"blue\">\n<b>";
print HTML_encode($1);
print "</b>\n<i>";
- print " commited by ";
+ print " committed by ";
print HTML_encode("$2");
print "</i>\n</font>\n"
}