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

[foxr]

foxr		Mon Jun 26 17:53:36 2006 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  Finalize fixes for defec 4832 Names with chars special to latex don't
  print.
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.444 loncom/interface/lonprintout.pm:1.445
--- loncom/interface/lonprintout.pm:1.444	Mon Jun 26 17:20:37 2006
+++ loncom/interface/lonprintout.pm	Mon Jun 26 17:53:36 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.444 2006/06/26 21:20:37 foxr Exp $
+# $Id: lonprintout.pm,v 1.445 2006/06/26 21:53:36 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -702,7 +702,8 @@
     if (!defined($udom)) { $udom=$env{'user.domain'}; }
     my $plainname=&Apache::loncommon::plainname($uname,$udom);
     if ($plainname=~/^\s*$/) { $plainname=$uname.'@'.$udom; }
-    $plainname=&Apache::lonxml::latex_special_symbols($plainname,'header');
+   #  $plainname=&Apache::lonxml::latex_special_symbols($plainname,'header');
+    $plainname = &escape_LaTeX($plainname);
     return $plainname;
 }
 
@@ -1804,7 +1805,9 @@
     }
     #  Fullname may have special latex characters that need \ prefixing:
     #
-    $fullname = escape_LaTeX($fullname);
+    &Apache::lonnet::logthis("Prior to latex escape: $fullname");
+#    $fullname = &escape_LaTeX($fullname);
+    &Apache::lonnet::logthis("After escape $fullname");
 
     my $i           = 0;
     #goes through all resources, checks if they are available for