| 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 |
|
|
| 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"); |
