[LON-CAPA-cvs] cvs: loncom(loncapaMITrelate_1) /xml londefdef.pm

[raeburn]

raeburn		Mon Mar  5 14:41:15 2012 EDT

  Modified files:              (Branch: loncapaMITrelate_1)
    /loncom/xml	londefdef.pm 
  Log:
  - Customization for MITrelate
    - Backport 1.438.
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.415.4.6 loncom/xml/londefdef.pm:1.415.4.6.2.1
--- loncom/xml/londefdef.pm:1.415.4.6	Tue Nov 15 17:34:19 2011
+++ loncom/xml/londefdef.pm	Mon Mar  5 14:41:15 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.415.4.6 2011/11/15 17:34:19 raeburn Exp $
+# $Id: londefdef.pm,v 1.415.4.6.2.1 2012/03/05 14:41:15 raeburn Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -56,7 +56,7 @@
 
 BEGIN {
 
-    &Apache::lonxml::register('Apache::londefdef',('a','abbr','acronym','accessrule','address','allow','applet','area','b','base','basefont','bgo','bgsound','big','blink','blockquote','blankspace','body','br','button','caption','center','cite','code','col','colgroup','dd','del','dfn','dir','div','dl','dt','em','embed','externallink','fieldset','font','form','frame','frameset','h1','h2','h3','h4','h5','h6','head','hr','html','i','iframe','img','input','ins','insert','isindex','kbd','keygen','label','layer','legend','li','link','m','map','marquee','menu','meta','multicol','nobr','noembed','noframes','nolayer','noscript','object','ol','optgroup','option','output','p','param','pre','q','s','samp','select','server','small','spacer','span','strike','strong','sub','sup','table','tbody','td','textarea','tfoot','th','thead','title','tr','tt','tthoption','u','ul','var','wbr','hideweboutput'));
+    &Apache::lonxml::register('Apache::londefdef',('a','abbr','acronym','accessrule','address','allow','applet','area','b','base','basefont','bgo','bgsound','big','blink','blockquote','blankspace','body','br','button','caption','center','cite','code','col','colgroup','dd','del','dfn','dir','div','dl','dt','em','embed','externallink','fieldset','font','form','frame','frameset','h1','h2','h3','h4','h5','h6','head','hr','html','i','iframe','img','input','ins','insert','isindex','kbd','keygen','label','layer','legend','li','link','m','map','marquee','menu','meta','multicol','nobr','noembed','noframes','nolayer','noscript','object','ol','optgroup','option','output','p','param','pre','q','s','samp','select','server','small','spacer','span','strike','strong','style','sub','sup','table','tbody','td','textarea','tfoot','th','thead','title','tr','tt','tthoption','u','ul','var','wbr','hideweboutput'));
 
 }
 
@@ -456,6 +456,31 @@
     <meta />';
 }
 
+#-- <start> tag
+sub start_style {
+    my ($target, $token, $tagstack, $parstack, $parser, $safeeval, $style) = @_;
+    my $currentstring = '';
+
+    if ($target eq 'tex') {
+        Apache::lonxml::startredirection();
+    } else {
+        $currentstring = $token->[4];
+    }
+    return $currentstring;
+}
+
+sub end_style {
+    my ($target, $token, $tagstack, $parstack, $parser, $safeeval) = @_;
+    my $currentstring = '';
+
+    if ($target eq 'tex') {
+        Apache::lonxml::endredirection();
+    } else {
+        $currentstring = $token->[2];
+    }
+    return $currentstring;
+}
+
 # accessrule
 sub start_accessrule {
     my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style) = @_;