[prev in list] [next in list] [prev in thread] [next in thread] 

List:       lon-capa-cvs
Subject:    [LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm
From:       raeburn <raeburn () source ! lon-capa ! org>
Date:       2015-02-10 14:03:48
Message-ID: cvsraeburn1423577028 () cvsserver
[Download RAW message or body]

raeburn		Tue Feb 10 14:03:48 2015 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  - Remove leading and trailing white space from name used to save CODEs.
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.644 loncom/interface/lonprintout.pm:1.645
--- loncom/interface/lonprintout.pm:1.644	Fri Dec 12 15:38:11 2014
+++ loncom/interface/lonprintout.pm	Tue Feb 10 14:03:47 2015
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.644 2014/12/12 15:38:11 raeburn Exp $
+# $Id: lonprintout.pm,v 1.645 2015/02/10 14:03:47 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3283,6 +3283,8 @@
 		 $moreenv{'CODE'}=&get_CODE(\%allcodes,$i,$seed,$code_length,
 					    $code_type);
 	     }
+             $code_name =~ s/^\s+//;
+             $code_name =~ s/\s+$//;
 	     if ($code_name) {
 		 &Apache::lonnet::put('CODEs',
 				      {


_______________________________________________
LON-CAPA-cvs mailing list
LON-CAPA-cvs@mail.lon-capa.org
http://mail.lon-capa.org/mailman/listinfo/lon-capa-cvs
[prev in list] [next in list] [prev in thread] [next in thread]