[LON-CAPA-cvs] cvs: loncom(version_1_0_1) /publisher lonpublisher.pm

[albertel]

albertel		Thu Aug 21 13:12:32 2003 EDT

  Modified files:              (Branch: version_1_0_1)
    /loncom/publisher	lonpublisher.pm 
  Log:
  - backport 1.130 1.131
  
  
Index: loncom/publisher/lonpublisher.pm
diff -u loncom/publisher/lonpublisher.pm:1.126 loncom/publisher/lonpublisher.pm:1.126.2.1
--- loncom/publisher/lonpublisher.pm:1.126	Wed Jul 23 15:17:27 2003
+++ loncom/publisher/lonpublisher.pm	Thu Aug 21 13:12:32 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.126 2003/07/23 19:17:27 bowersj2 Exp $
+# $Id: lonpublisher.pm,v 1.126.2.1 2003/08/21 17:12:32 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -698,8 +698,9 @@
 		}
 		if (!$endtag) { if ($token->[4]=~m:/>$:) { $endtag=' /'; }; }
 		$outstring.='<'.$tag.$newparmstring.$endtag.'>';
-		if ($lctag eq 'm') {
-		    $outstring.=&get_all_text_unbalanced('/m',\@parser);
+		if ($lctag eq 'm' || $lctag eq 'script' 
+                    || $lctag eq 'display' || $lctag eq 'tex') {
+		    $outstring.=&get_all_text_unbalanced('/'.$lctag,\@parser);
 		}
 	    } elsif ($token->[0] eq 'E') {
 		if ($token->[2]) {