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

[albertel]

albertel		Fri Jan 13 16:05:58 2006 EDT

  Modified files:              (Branch: version_2_1_X)
    /loncom/xml	londefdef.pm 
  Log:
  - force image to top of the table cell
  - was overcorrecting for the center whitespace insert
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.302.2.2 loncom/xml/londefdef.pm:1.302.2.3
--- loncom/xml/londefdef.pm:1.302.2.2	Mon Jan  9 17:54:47 2006
+++ loncom/xml/londefdef.pm	Fri Jan 13 16:05:57 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.302.2.2 2006/01/09 22:54:47 albertel Exp $
+# $Id: londefdef.pm,v 1.302.2.3 2006/01/13 21:05:57 albertel Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -620,7 +620,7 @@
     } elsif ($target eq 'tex') {
 	$currentstring = '\end{center}';  
 	if (&is_inside_of($tagstack, "table")) {
-	    $currentstring .= &center_correction();
+	    #$currentstring .= &center_correction();
 	}
     }
     return $currentstring;
@@ -1194,7 +1194,7 @@
 	    $closing_string = '\end{center}';
 	    if (&is_inside_of($tagstack, "table")) {
 		$currentstring = &center_correction().$currentstring;
-		$closing_string .= &center_correction();
+		#$closing_string .= &center_correction();
 	    }
 	} elsif ($align eq 'right') {
 	    $currentstring.='\makebox['.$env{'form.textwidth'}.']{\hfill\llap{';
@@ -1539,7 +1539,7 @@
 	    $endstring      = '\end{center}';
 	    if (&is_inside_of($tagstack, "table")) {
 		$currentstring = &center_correction().$currentstring;
-		$endstring .= &center_correction();
+		#$endstring .= &center_correction();
 	    }
 	}
 	elsif ($align eq 'right') {
@@ -2216,7 +2216,7 @@
 		}
 		$output.=$Apache::londefdef::table[-1]{'content'}[$in][$jn];
 		if ($Apache::londefdef::table[-1]{'align'}[$in][$jn] eq 'c') {
-		    $output.='\end{center}'.&center_correction();
+		    $output.='\end{center}';#.&center_correction();
 		} elsif ($Apache::londefdef::table[-1]{'align'}[$in][$jn] eq 'r') {
 		    $output.='} ';
 		}
@@ -2654,8 +2654,8 @@
 						  undef,1));
 	if(!$align) {
 	    # disabled for now see BUG#4535
-	    if (0 && &is_inside_of($tagstack, "table")) {
-		$align = "right";      # Force wraptext use. 
+	    if (&is_inside_of($tagstack, "table")) {
+		$align = "top";      # Force top of image to top of table cell 
 	    } else {
 		$align = "bottom";	# This is html's default so it's ours too.
 	    }