ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/i-scream/web/cgi-bin/cvslog.cgi

Comparing web/cgi-bin/cvslog.cgi (file contents):
Revision 1.20 by tdb, Sun Dec 9 02:53:36 2001 UTC vs.
Revision 1.22 by tdb, Tue Feb 5 14:03:08 2002 UTC

#	Line 44 | Line 44 | $modulelist = `ls $cvsroot` unless defined $modulelist
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
#	Line 83 | Line 84 | print <<"END";
84		<h2>$heading</h2>
85		END
86
87	<	print `$updatecmd`;
87	>	print `$updatecmd >/dev/null 2>&1`;
88
89		my(@modules) = split (/\s+/, $modulelist);
90
#	Line 123 | Line 124 | foreach my $module (@modules) {
124		print "<a href=\"/cgi-bin/cvs/viewcvs.cgi/$file\" style=\"text-decoration: none;\">";
125		print HTML_encode($file);
126		print "</a> ";
127	<	if($rest =~ /\((\d+).(\d+)(.*)\)/) {
127	>	if($rest =~ /\((\S+)\.(\d+)(.*)\)/) {
128		my $newrev = "$1.$2";
129		my $oldminver = $2-1;
130		my $oldrev = "$1.$oldminver";
131	<	if(!($1==1 && $2==1)) {
131	>	if($2 != 1) {
132		my $diff = ".diff?r1=$oldrev&r2=$newrev";
133		print "(<a href=\"/cgi-bin/cvs/viewcvs.cgi/$file$diff\" style=\"text-decoration: none;\">";
134		print HTML_encode("$1.$2");

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines