diff options
author | Fred Drake <fdrake@acm.org> | 1998-03-04 05:30:49 (GMT) |
---|---|---|
committer | Fred Drake <fdrake@acm.org> | 1998-03-04 05:30:49 (GMT) |
commit | 2da947af878842ab8676e48a26d1aeb25c082e3e (patch) | |
tree | eb2b5c21e5193e61715a61f58845ed65eae266c1 /Doc/perl | |
parent | 3fe985fc2865266297168124c0edcf420dea9194 (diff) | |
download | cpython-2da947af878842ab8676e48a26d1aeb25c082e3e.zip cpython-2da947af878842ab8676e48a26d1aeb25c082e3e.tar.gz cpython-2da947af878842ab8676e48a26d1aeb25c082e3e.tar.bz2 |
Comment out the attempt to get index-related stuff processed in the right
order. LaTeX2HTML just doesn't do things the same way as LaTeX, and this
wasn't the fix.
Simplify the generated HTML for \file{}.
For \samp{}, use "..." instead of `...'; many fonts make that look pretty
bad. ;-(
Diffstat (limited to 'Doc/perl')
-rw-r--r-- | Doc/perl/python.perl | 48 |
1 files changed, 24 insertions, 24 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl index 73c917e..2ea09e6 100644 --- a/Doc/perl/python.perl +++ b/Doc/perl/python.perl @@ -317,28 +317,28 @@ sub init_myformat{ $any_next_pair_pr_rx_5 = "$OP(\\d+)$CP([\\s\\S]*)$OP\\5$CP"; $any_next_pair_pr_rx_7 = "$OP(\\d+)$CP([\\s\\S]*)$OP\\7$CP"; $any_next_pair_pr_rx_9 = "$OP(\\d+)$CP([\\s\\S]*)$OP\\9$CP"; - if (defined &process_commands_wrap_deferred) { - &process_commands_wrap_deferred(<<THESE_COMMANDS); -indexii # {} # {} -indexiii # {} # {} # {} -indexiv # {} # {} # {} # {} -exindex # {} -obindex # {} -opindex # {} -stindex # {} -ttindex # {} -bifuncindex # {} -modindex # {} -bimodindex # {} -exmodindex # {} -stmodindex # {} -refmodindex # {} -refbimodindex # {} -refexmodindex # {} -refstmodindex # {} -rfc # {} -THESE_COMMANDS - } +# if (defined &process_commands_wrap_deferred) { +# &process_commands_wrap_deferred(<<THESE_COMMANDS); +# indexii # {} # {} +# indexiii # {} # {} # {} +# indexiv # {} # {} # {} # {} +# exindex # {} +# obindex # {} +# opindex # {} +# stindex # {} +# ttindex # {} +# bifuncindex # {} +# modindex # {} +# bimodindex # {} +# exmodindex # {} +# stmodindex # {} +# refmodindex # {} +# refbimodindex # {} +# refexmodindex # {} +# refstmodindex # {} +# rfc # {} +# THESE_COMMANDS +# } } &init_myformat; @@ -697,13 +697,13 @@ sub do_cmd_file{ # understand "<font face=...>" markup will use courier (or whatever # the font is for <tt>). local($_) = @_; - s/$any_next_pair_pr_rx/`<tt><font face=sans-serif>\2<\/font><\/tt>'/; + s/$any_next_pair_pr_rx/\"<tt>\2<\/tt>\"/; $_; } sub do_cmd_samp{ local($_) = @_; - s/$any_next_pair_pr_rx/`<tt>\2<\/tt>'/; + s/$any_next_pair_pr_rx/\"<tt>\2<\/tt>\"/; $_; } |