diff options
| author | Fred Drake <fdrake@acm.org> | 1998-05-20 21:32:09 (GMT) |
|---|---|---|
| committer | Fred Drake <fdrake@acm.org> | 1998-05-20 21:32:09 (GMT) |
| commit | 885215c3da9b70f535acbea2c15ccebe1705da04 (patch) | |
| tree | 49aa4657a260cfc0a8228d5787951b5cde50fad9 /Doc/perl | |
| parent | 3bf7865a20266cfdc16bb311e181177a5e7d87d6 (diff) | |
| download | cpython-885215c3da9b70f535acbea2c15ccebe1705da04.zip cpython-885215c3da9b70f535acbea2c15ccebe1705da04.tar.gz cpython-885215c3da9b70f535acbea2c15ccebe1705da04.tar.bz2 | |
Added support for AMK's {definitions} environment; thanks for the reminder!
Diffstat (limited to 'Doc/perl')
| -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 |