diff options
| -rw-r--r-- | Doc/perl/python.perl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl index 4c9d86d..3a1eaa1 100644 --- a/Doc/perl/python.perl +++ b/Doc/perl/python.perl @@ -284,6 +284,16 @@ sub do_cmd_index{ "$aname$anchor_invisible_mark</a>" . $_; } +sub do_cmd_kwindex{ + local($_) = @_; + my($str,$br_id) = next_argument_id(); + # + my($name,$aname,$ahref) = link_info($br_id); + add_index_entry("<tt>$str</tt>!keyword", $ahref); + add_index_entry("keyword!<tt>$str</tt>", $ahref); + "$aname$anchor_invisible_mark</a>" . $_; +} + sub do_cmd_indexii{ local($_) = @_; my($str1,$br_id) = next_argument_id(); |