version 1.2, 1996/09/29 02:19:30 |
version 1.3, 1997/02/03 15:14:22 |
Line 366 if (-d $fullname) { |
|
Line 366 if (-d $fullname) { |
|
|
|
for ($i = 0; $i <= $#revorder; $i++) { |
for ($i = 0; $i <= $#revorder; $i++) { |
$_ = $revorder[$i]; |
$_ = $revorder[$i]; |
|
print "<a NAME=\"rev$_\"></a>\n"; |
# print "RCS revision <b>$_</b>\n"; |
# print "RCS revision <b>$_</b>\n"; |
print "<A HREF=\"$scriptwhere?rev=$_\"><b>$_</b></A>"; |
print "<A HREF=\"$scriptwhere?rev=$_\"><b>$_</b></A>"; |
if (/^1\.1\.1\.\d+$/) { |
if (/^1\.1\.1\.\d+$/) { |