[LON-CAPA-cvs] cvs: loncom /xml lonxml.pm

[albertel]

albertel		Thu Mar  4 18:01:31 2004 EDT

  Modified files:              
    /loncom/xml	lonxml.pm 
  Log:
  - printing was breaking for ½
    
  
  
Index: loncom/xml/lonxml.pm
diff -u loncom/xml/lonxml.pm:1.307 loncom/xml/lonxml.pm:1.308
--- loncom/xml/lonxml.pm:1.307	Tue Mar  2 17:45:56 2004
+++ loncom/xml/lonxml.pm	Thu Mar  4 18:01:31 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # XML Parser Module 
 #
-# $Id: lonxml.pm,v 1.307 2004/03/02 22:45:56 albertel Exp $
+# $Id: lonxml.pm,v 1.308 2004/03/04 23:01:31 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -409,7 +409,7 @@
 	$string=~s/\~/\\char126 /g;
 	#fixup & if it doesn't look like
         # { or α
-	$string=~s/(&(?!((\#[0-9]+)|([a-z]+));))/\\$1/gi;
+	$string=~s/(&(?!((\#[0-9]+)|([a-z][a-z0-9]*));))/\\$1/gi;
         $string=~s/([^&\\])\#/$1\\#/g;
 	$string=~s/\#\#/\#\\#/g;
 	$string=~s/(\$|_|{|})/\\$1/g;