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

[sakharuk]

sakharuk		Thu Jul 11 16:05:44 2002 EDT

  Modified files:              
    /loncom/xml	londefdef.pm 
  Log:
  Added the same changes to <th> tag
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.71 loncom/xml/londefdef.pm:1.72
--- loncom/xml/londefdef.pm:1.71	Thu Jul 11 15:32:06 2002
+++ loncom/xml/londefdef.pm	Thu Jul 11 16:05:44 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.71 2002/07/11 19:32:06 sakharuk Exp $
+# $Id: londefdef.pm,v 1.72 2002/07/11 20:05:44 sakharuk Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -1424,7 +1424,10 @@
 	    } elsif ($target eq 'tex') {
 		my $current_row = $Apache::londefdef::table[-1]{'row_number'};
 		my $data=&Apache::lonxml::endredirection();
-		@{ $Apache::londefdef::table[-1]{'rowdata'} }[$current_row] .= '\bf{'.$data.'} '.$Apache::londefdef::table[-1]{'vinc'};
+		if ($data=~m/width\s*=\s*(\d+\.*\d*\s*(mm|cm))/) {                 #just added
+                    $Apache::londefdef::table[-1]{'length'} .= $1.',';             #just added
+		}                                                                  #just added
+		@{ $Apache::londefdef::table[-1]{'rowdata'} }[$current_row] .= '\parbox{'.$1.'}{\textbf{'.$data.'}} '.$Apache::londefdef::table[-1]{'vinc'};
 	    }
 	   return $currentstring;
 	}