[LON-CAPA-cvs] cvs: loncom(version_1_1_X) /interface loncommon.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Tue, 13 Jan 2004 18:54:07 -0000
albertel Tue Jan 13 13:54:07 2004 EDT
Modified files: (Branch: version_1_1_X)
/loncom/interface loncommon.pm
Log:
- bacport 1.171
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.159 loncom/interface/loncommon.pm:1.159.2.1
--- loncom/interface/loncommon.pm:1.159 Mon Dec 15 14:23:03 2003
+++ loncom/interface/loncommon.pm Tue Jan 13 13:54:07 2004
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.159 2003/12/15 19:23:03 www Exp $
+# $Id: loncommon.pm,v 1.159.2.1 2004/01/13 18:54:07 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2472,7 +2472,7 @@
}
} elsif ($ENV{'form.upfiletype'} eq 'tab') {
my $i=0;
- foreach (split(/\t+/,$record)) {
+ foreach (split(/\t/,$record)) {
my $field=$_;
$field=~s/^(\"|\')//;
$field=~s/(\"|\')$//;