diff options
| -rw-r--r-- | Doc/perl/python.perl | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl index 7267497..3f34539 100644 --- a/Doc/perl/python.perl +++ b/Doc/perl/python.perl @@ -837,4 +837,24 @@ sub do_cmd_maketitle { } +# +# Definition list support. +# + +sub do_env_definitions{ + local($_) = @_; + swallow_newline(); + "<dl>$_</dl>\n"; +} + +sub do_cmd_term{ + local($_) = @_; + my($term, $id) = next_argument_id(); + my($name,$aname,$ahref) = link_info($id); + swallow_newline(); + # could easily add an index entry here... + "<dt><b>$aname" . $term . "</a></b>\n<dd>" . $_; +} + + 1; # This must be the last line |