[LON-CAPA-cvs] cvs: loncom(version_2_8_X) /publisher lonpublisher.pm
raeburn
raeburn@source.lon-capa.org
Tue, 24 Nov 2009 00:57:11 -0000
raeburn Tue Nov 24 00:57:11 2009 EDT
Modified files: (Branch: version_2_8_X)
/loncom/publisher lonpublisher.pm
Log:
- Backport 1.252.
Index: loncom/publisher/lonpublisher.pm
diff -u loncom/publisher/lonpublisher.pm:1.249 loncom/publisher/lonpublisher.pm:1.249.2.1
--- loncom/publisher/lonpublisher.pm:1.249 Sun Dec 7 23:49:40 2008
+++ loncom/publisher/lonpublisher.pm Tue Nov 24 00:57:11 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Publication Handler
#
-# $Id: lonpublisher.pm,v 1.249 2008/12/07 23:49:40 www Exp $
+# $Id: lonpublisher.pm,v 1.249.2.1 2009/11/24 00:57:11 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1652,7 +1652,7 @@
unlink($srcd.'/'.$filename);
unlink($srcd.'/'.$filename.'.meta');
} else {
- if ($filename=~/\Q$srcf\E\.(\d+)\.\Q$srct\E$/) {
+ if ($filename=~/^\Q$srcf\E\.(\d+)\.\Q$srct\E$/) {
$maxversion=($1>$maxversion)?$1:$maxversion;
}
}