[Python-checkins] CVS: python/dist/src/Doc/perl python.perl,1.65.2.6,1.65.2.7

[Fred L. Drake]

Update of /projects/cvsroot/python/dist/src/Doc/perl
In directory weyr:/home/fdrake/projects/python/Doc-152p2/perl

Modified Files:
      Tag: release152p1-patches
	python.perl 
Log Message:

Be even more careful about tables: explicitly translate the content of 
the table rather than letting the default processing take care of it.

The problem was that when multiple tables on a single output page used 
different alignments, the specifier for the last table on the page was 
used for all tables.  This is because LaTeX2HTML processes all the
enironments before processing other macros; internal state is
maintained for each table (column alignment!), which go overwritten as 
additional tables were processed.  The saved state for the last table
processed was then used for all the tables on the page.

LaTeX2HTML is pain.


Index: python.perl
===================================================================
RCS file: /projects/cvsroot/python/dist/src/Doc/perl/python.perl,v
retrieving revision 1.65.2.6
retrieving revision 1.65.2.7
diff -C2 -r1.65.2.6 -r1.65.2.7
*** python.perl	2000/03/03 16:28:25	1.65.2.6
--- python.perl	2000/03/14 18:45:22	1.65.2.7
***************
*** 906,914 ****
        { $r = ' align="center"'; }
      elsif ($mark eq 'r')
!       { $r = ' align="right" '; }
      elsif ($mark eq 'l')
!       { $r = ' align="left"  '; }
      elsif ($mark eq 'p')
!       { $r = ' align="left"  '; }
      return $r;
  }
--- 906,914 ----
        { $r = ' align="center"'; }
      elsif ($mark eq 'r')
!       { $r = ' align="right"'; }
      elsif ($mark eq 'l')
!       { $r = ' align="left"'; }
      elsif ($mark eq 'p')
!       { $r = ' align="left"'; }
      return $r;
  }
***************
*** 955,959 ****
  	   . "\n    </thead>"
  	   . "\n  <tbody valign='baseline'>"
! 	   . $_
  	   . "\n    </tbody>"
  	   . "\n</table>";
--- 955,959 ----
  	   . "\n    </thead>"
  	   . "\n  <tbody valign='baseline'>"
!            . translate_commands($_)
  	   . "\n    </tbody>"
  	   . "\n</table>";
***************
*** 994,998 ****
  	   . "\n    </thead>"
  	   . "\n  <tbody valign='baseline'>"
! 	   . $_
  	   . "\n    </tbody>"
  	   . "\n</table>";
--- 994,998 ----
  	   . "\n    </thead>"
  	   . "\n  <tbody valign='baseline'>"
! 	   . translate_commands($_)
  	   . "\n    </tbody>"
  	   . "\n</table>";
***************
*** 1037,1041 ****
  	   . "\n    </thead>"
  	   . "\n  <tbody valign='baseline'>"
! 	   . $_
  	   . "\n    </tbody>"
  	   . "\n</table>";
--- 1037,1041 ----
  	   . "\n    </thead>"
  	   . "\n  <tbody valign='baseline'>"
! 	   . translate_commands($_)
  	   . "\n    </tbody>"
  	   . "\n</table>";