traverseda
/
cpython
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add yet more markup that let's a stylesheet pick out a small bit of the 

presentation.  This is acceptable since it only occurs in the formatted
output and does not affect the document markup.
This commit is contained in:
Fred Drake 2001-10-26 03:09:27 +00:00
parent 7f10cce4c1
commit af07b2c34f
1 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Doc/perl/python.perl
View File

@ -868,6 +868,10 @@ sub get_refcount{
return $REFCOUNTS{"$func:$param"}; return $REFCOUNTS{"$func:$param"};
} }
$TLSTART = '<span class="typelabel">';
$TLEND = '</span>';
sub do_env_cfuncdesc{ sub do_env_cfuncdesc{
local($_) = @_; local($_) = @_;
my $return_type = next_argument(); my $return_type = next_argument();
@ -1047,7 +1051,10 @@ sub do_env_excdesc{
local($_) = @_; local($_) = @_;
my $excname = next_argument(); my $excname = next_argument();
my $idx = make_str_index_entry("<tt class=\"exception\">$excname</tt>"); my $idx = make_str_index_entry("<tt class=\"exception\">$excname</tt>");
return "<dl><dt><b>exception $idx</b>\n<dd>" . $_ . '</dl>' return ("<dl><dt><b>${TLSTART}exception$TLEND $idx</b>"
. "\n<dd>"
. $_
. '</dl>');
} }
sub do_env_fulllineitems{ return do_env_itemize(@_); } sub do_env_fulllineitems{ return do_env_itemize(@_); }
@ -1060,7 +1067,8 @@ sub handle_classlike_descriptor{
$idx = make_str_index_entry( $idx = make_str_index_entry(
"<tt class=\"$what\">$THIS_CLASS</tt> ($what in $THIS_MODULE)" ); "<tt class=\"$what\">$THIS_CLASS</tt> ($what in $THIS_MODULE)" );
$idx =~ s/ \(.*\)//; $idx =~ s/ \(.*\)//;
return ("<dl><dt><b>$what $idx</b>(<var>$arg_list</var>)\n<dd>" return ("<dl><dt><b>$TLSTART$what$TLEND $idx</b>"
. "(<var>$arg_list</var>)\n<dd>"
. $_ . $_
. '</dl>'); . '</dl>');
} }
@ -1075,7 +1083,7 @@ sub do_env_classdescstar{
$idx = make_str_index_entry( $idx = make_str_index_entry(
"<tt class=\"class\">$THIS_CLASS</tt> (class in $THIS_MODULE)"); "<tt class=\"class\">$THIS_CLASS</tt> (class in $THIS_MODULE)");
$idx =~ s/ \(.*\)//; $idx =~ s/ \(.*\)//;
return ("<dl><dt><b>class $idx</b>\n<dd>" return ("<dl><dt><b>${TLSTART}class$TLEND $idx</b>\n<dd>"
. $_ . $_
. '</dl>'); . '</dl>');
} }