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

raeburn lon-capa-cvs@mail.lon-capa.org
Sun, 17 Dec 2006 15:52:37 -0000


raeburn		Sun Dec 17 10:52:37 2006 EDT

  Modified files:              
    /loncom/interface	lonmsgdisplay.pm 
  Log:
  Escape quotes in mail folder names when creating strings for javascript arrays to avoid javascript errors.
  
  
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.51 loncom/interface/lonmsgdisplay.pm:1.52
--- loncom/interface/lonmsgdisplay.pm:1.51	Fri Dec  8 15:32:36 2006
+++ loncom/interface/lonmsgdisplay.pm	Sun Dec 17 10:52:37 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging display
 #
-# $Id: lonmsgdisplay.pm,v 1.51 2006/12/08 20:32:36 raeburn Exp $
+# $Id: lonmsgdisplay.pm,v 1.52 2006/12/17 15:52:37 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -173,6 +173,7 @@
     my %userfolders;
 
     foreach my $key (keys(%gotfolders)) {
+        $key =~ s/(['"])/\$1/g;
         $userfolders{$key} = $key;
     }
     my @userorder = sort(keys(%userfolders));