Return to lonpublisher.pm CVS log | Up to [LON-CAPA] / loncom / publisher |
version 1.251, 2009/02/11 11:49:22 | version 1.252, 2009/03/09 20:10:55 |
---|---|
Line 1652 sub phasetwo { | Line 1652 sub phasetwo { |
unlink($srcd.'/'.$filename); | unlink($srcd.'/'.$filename); |
unlink($srcd.'/'.$filename.'.meta'); | unlink($srcd.'/'.$filename.'.meta'); |
} else { | } else { |
if ($filename=~/\Q$srcf\E\.(\d+)\.\Q$srct\E$/) { | if ($filename=~/^\Q$srcf\E\.(\d+)\.\Q$srct\E$/) { |
$maxversion=($1>$maxversion)?$1:$maxversion; | $maxversion=($1>$maxversion)?$1:$maxversion; |
} | } |
} | } |