--- web/cgi-bin/cvslog.cgi 2001/06/18 15:19:37 1.16 +++ web/cgi-bin/cvslog.cgi 2001/12/09 00:25:48 1.18 @@ -22,6 +22,12 @@ elsif($period eq "date") { $heading = "i-scream CVS$moduleext commits on $date"; $firstdate = "$date 00:00<$date 23:59" } +elsif($period eq "since") { + my($date)=$query->param('date'); + $date = `/bin/date \"+%Y/%m/%d\"` unless defined $date; + $heading = "i-scream CVS$moduleext commits since $date"; + $firstdate = ">$date"; +} elsif($period eq "thisweek") { $firstdate = ">last Sunday"; $heading = "i-scream CVS$moduleext commits this week"; @@ -35,6 +41,7 @@ else { my($cvsroot) = "/cvs/i-scream"; $modulelist = `ls $cvsroot` unless defined $modulelist; +$modulelist =~ s/[\r\n]/ /gm; my($cvs2clpath) = "/home/sites/www.i-scream.org.uk/bin/cvs2cl2.pl"; my($cvs2clargs) = "--stdout --no-wrap -r -b -t -w -S -U $cvsroot/CVSROOT/users -l \"-d'$firstdate'\" -g \"-d$cvsroot\" -g \"-Q\"";