| 44 |
|
$modulelist =~ s/[\r\n]/ /gm; |
| 45 |
|
|
| 46 |
|
my($cvs2clpath) = "/home/sites/www.i-scream.org.uk/bin/cvs2cl2.pl"; |
| 47 |
< |
my($cvs2clargs) = "--stdout --no-wrap -r -b -t -w -S -U $cvsroot/CVSROOT/users -l \"-d'$firstdate'\" -g \"-d$cvsroot\" -g \"-Q\""; |
| 47 |
> |
#my($cvs2clargs) = "--stdout --no-wrap -r -b -t -w -S -U $cvsroot/CVSROOT/users -l \"-d'$firstdate'\" -g \"-d$cvsroot\" -g \"-Q\""; |
| 48 |
> |
my($cvs2clargs) = "--stdout --no-wrap -r -t -w -S -U $cvsroot/CVSROOT/users -l \"-d'$firstdate'\" -g \"-d$cvsroot\" -g \"-Q\""; |
| 49 |
|
my($updatecmd) = "/home/sites/www.i-scream.org.uk/bin/fullcvsupdate.sh $modulelist"; |
| 50 |
|
my($logcmd) = "cd /home/sites/www.i-scream.org.uk/cvsscripttemp && $cvs2clpath $cvs2clargs"; |
| 51 |
|
|
| 108 |
|
print " commited by <a href=\"mailto:$3\" style=\"text-decoration: none;\">"; |
| 109 |
|
print HTML_encode("$2"); |
| 110 |
|
print "</a></i>\n</font>\n" |
| 111 |
+ |
} |
| 112 |
+ |
elsif ($line =~ /^([0-9]{4}-[0-9]{2}-[0-9]{2}.*?)\s+([^\s]+)$/) { |
| 113 |
+ |
print "\n<font color=\"blue\">\n<b>"; |
| 114 |
+ |
print HTML_encode($1); |
| 115 |
+ |
print "</b>\n<i>"; |
| 116 |
+ |
print " commited by "; |
| 117 |
+ |
print HTML_encode("$2"); |
| 118 |
+ |
print "</i>\n</font>\n" |
| 119 |
|
} |
| 120 |
|
elsif($line =~ /(\S+) (\(\S+\))([,:])/ || $line =~ /(\S+) (\(\S+,\s+\S+\))([,:])/) { |
| 121 |
|
#chop $line; |
