--- loncom/interface/loncommon.pm 2007/08/08 19:13:43 1.559 +++ loncom/interface/loncommon.pm 2007/08/11 14:22:14 1.560 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.559 2007/08/08 19:13:43 albertel Exp $ +# $Id: loncommon.pm,v 1.560 2007/08/11 14:22:14 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5996,9 +5996,9 @@ sub record_sep { } else { my @allfields; if ($env{'form.upfiletype'} eq 'semisv') { - @allfields=split(/;/,$record,-1); + @allfields=split(/\s*;\s*/,$record,-1); } else { - @allfields=split(/\,/,$record,-1); + @allfields=split(/\s*\,\s*/,$record,-1); } my $i=0; my $j;