[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm

albertel lon-capa-cvs@mail.lon-capa.org
Wed, 24 Jan 2007 21:42:06 -0000


albertel		Wed Jan 24 16:42:06 2007 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  -  handle lines with trailing empties properly
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.503 loncom/interface/loncommon.pm:1.504
--- loncom/interface/loncommon.pm:1.503	Tue Jan 23 15:00:38 2007
+++ loncom/interface/loncommon.pm	Wed Jan 24 16:42:01 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.503 2007/01/23 20:00:38 raeburn Exp $
+# $Id: loncommon.pm,v 1.504 2007/01/24 21:42:01 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -5394,9 +5394,9 @@
     } else {
         my @allfields;
         if ($env{'form.upfiletype'} eq 'semisv') {
-            @allfields=split(/;/,$record);
+            @allfields=split(/;/,$record,-1);
         } else {
-            @allfields=split(/\,/,$record);
+            @allfields=split(/\,/,$record,-1);
         }
         my $i=0;
         my $j;