--- loncom/interface/loncommon.pm	2004/01/02 21:00:56	1.170
+++ loncom/interface/loncommon.pm	2004/01/13 15:48:25	1.171
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.170 2004/01/02 21:00:56 www Exp $
+# $Id: loncommon.pm,v 1.171 2004/01/13 15:48:25 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2600,7 +2600,7 @@ sub record_sep {
         }
     } elsif ($ENV{'form.upfiletype'} eq 'tab') {
         my $i=0;
-        foreach (split(/\t+/,$record)) {
+        foreach (split(/\t/,$record)) {
             my $field=$_;
             $field=~s/^(\"|\')//;
             $field=~s/(\"|\')$//;