summaryrefslogtreecommitdiffstats
path: root/Doc
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>1998-02-19 17:26:48 (GMT)
committerFred Drake <fdrake@acm.org>1998-02-19 17:26:48 (GMT)
commit05ce570e8be8cca40ec921e5da234ea46b28334e (patch)
tree0658a41dbe06c7874a84eba5c928af030cac7e64 /Doc
parent1f0fdde4fb92075596a409ac25a0dd3c8316033d (diff)
downloadcpython-05ce570e8be8cca40ec921e5da234ea46b28334e.zip
cpython-05ce570e8be8cca40ec921e5da234ea46b28334e.tar.gz
cpython-05ce570e8be8cca40ec921e5da234ea46b28334e.tar.bz2
Remove debugging print.
Support {classdesc} and {fulllineitems} environments. Support most recent logical markup.
Diffstat (limited to 'Doc')
-rw-r--r--Doc/myformat.perl10
1 files changed, 7 insertions, 3 deletions
diff --git a/Doc/myformat.perl b/Doc/myformat.perl
index baa9b90..e3783a9 100644
--- a/Doc/myformat.perl
+++ b/Doc/myformat.perl
@@ -52,11 +52,14 @@ sub do_cmd_keyword{ &do_cmd_code(@_); }
sub do_cmd_exception{ &do_cmd_code(@_); }
sub do_cmd_class{ &do_cmd_code(@_); }
sub do_cmd_function{ &do_cmd_code(@_); }
-sub do_cmd_cfunction{ &do_cmd_code(@_); }
sub do_cmd_constant{ &do_cmd_code(@_); }
+sub do_cmd_member{ &do_cmd_code(@_); }
sub do_cmd_method{ &do_cmd_code(@_); }
sub do_cmd_email{ &do_cmd_code(@_); }
sub do_cmd_program{ &do_cmd_code(@_); }
+sub do_cmd_cfunction{ &do_cmd_code(@_); }
+sub do_cmd_cdata{ &do_cmd_code(@_); }
+sub do_cmd_ctype{ &do_cmd_code(@_); }
sub do_cmd_email{
local($_) = @_;
@@ -455,7 +458,8 @@ sub do_cmd_dataline{
}
sub do_env_excdesc{ &do_env_datadesc(@_); }
-sub do_env_codesample{ &do_env_verbatim(@_); }
+sub do_env_classdesc{ &do_env_funcdesc(@_); }
+sub do_env_fulllineitems{ &do_env_itemize(@_); }
@col_aligns = ("<td>", "<td>", "<td>");
@@ -552,10 +556,10 @@ sub do_cmd_seemodule{
s/$next_pair_pr_rx$any_next_pair_pr_rx3//;
local($module,$text,$node,$key) = ($2, $4, '', "module$2");
$key =~ s/_//g;
+ # XXX somewhat bogus computation of $node
# $node = $external_labels{$key} unless
# ($node = $ref_files{$key});
$node = $key;
- print "seemodule $module: $node#$key\n";
"<p>Module <tt><b><a href=\"$node#$key\">$module</a></b></tt>"
. "&nbsp;&nbsp;&nbsp;($text)</p>"
. $_;