diff Doc/perl/python.perl @ 7563:59b1ab01c286 legacy-trunk

For verbatim text, don't bounce down a size.
author Fred Drake <fdrake@acm.org>
date Thu, 05 Mar 1998 17:00:55 +0000
parents 7830e1de9817
children 0f565c7fe4bb
line wrap: on
line diff
--- a/Doc/perl/python.perl	Thu Mar 05 16:59:36 1998 +0000
+++ b/Doc/perl/python.perl	Thu Mar 05 17:00:55 1998 +0000
@@ -366,8 +366,7 @@
 # (Used with LaTeX2HTML 96.1*)
 sub replace_verbatim {
     # Modifies $_
-    local($prefix,$suffix) = ("\n<p><dl><dd><pre><font size=-1>\n",
-			      "</font></pre></dl>");
+    local($prefix,$suffix) = ("\n<p><dl><dd><pre>\n", "</pre></dl>");
     s/$verbatim_mark(verbatim)(\d+)/$prefix$verbatim{$2}$suffix/go;
     s/$verbatim_mark(rawhtml)(\d+)/$verbatim{$2}/ego;	# Raw HTML
 }
@@ -375,8 +374,7 @@
 # (Used with LaTeX2HTML 98.1)
 sub replace_verbatim_hook{
     # Modifies $_
-    local($prefix,$suffix) = ("\n<p><dl><dd><font size=-1>",
-			      "</font></dl>");
+    local($prefix,$suffix) = ("\n<p><dl><dd>", "</dl>");
     s/$math_verbatim_rx/&put_comment("MATH: ".$verbatim{$1})/eg;
     s/$verbatim_mark(\w*[vV]erbatim\*?)(\d+)\#/$prefix$verbatim{$2}$suffix/go;
     # Raw HTML, but replacements may have protected characters