![[BACK]](/icons/back.gif){kind=icon}
Return to lonpublisher.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / publisher|
Return to lonpublisher.pm CVS log | Up to [LON-CAPA] / loncom / publisher |
| version 1.249, 2008/12/07 23:49:40 | version 1.249.2.1, 2009/11/24 00:57:11 |
|---|---|
| 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; |
| } | } |
| } | } |