version 1.98, 2002/10/03 15:02:22
|
version 1.99, 2002/10/07 13:50:36
|
Line 1309 if (-e $target) {
|
Line 1309 if (-e $target) {
|
while ($filename=readdir(DIR)) { |
while ($filename=readdir(DIR)) { |
if (-l $srcd.'/'.$filename) { |
if (-l $srcd.'/'.$filename) { |
unlink($srcd.'/'.$filename); |
unlink($srcd.'/'.$filename); |
|
unlink($srcd.'/'.$filename.'.meta'); |
} else { |
} else { |
if ($filename=~/$srcf\.(\d+)\.$srct$/) { |
if ($filename=~/$srcf\.(\d+)\.$srct$/) { |
$maxversion=($1>$maxversion)?$1:$maxversion; |
$maxversion=($1>$maxversion)?$1:$maxversion; |