diff options
author | Fred Drake <fdrake@acm.org> | 2004-01-23 08:52:28 (GMT) |
---|---|---|
committer | Fred Drake <fdrake@acm.org> | 2004-01-23 08:52:28 (GMT) |
commit | f0f6d12cd4d2159cbe2473c6ff5aeb5f9d245e02 (patch) | |
tree | dec64d0de926fa60eca7813d640433d3dedbf819 /Doc/perl | |
parent | 226f697560af74985ee5ecf2fc4f6b1c991006dc (diff) | |
download | cpython-f0f6d12cd4d2159cbe2473c6ff5aeb5f9d245e02.zip cpython-f0f6d12cd4d2159cbe2473c6ff5aeb5f9d245e02.tar.gz cpython-f0f6d12cd4d2159cbe2473c6ff5aeb5f9d245e02.tar.bz2 |
add \guilabel macro to mark labels that occur in user interfaces
Diffstat (limited to 'Doc/perl')
-rw-r--r-- | Doc/perl/python.perl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl index 89e12d5..d5d000f 100644 --- a/Doc/perl/python.perl +++ b/Doc/perl/python.perl @@ -95,9 +95,12 @@ sub do_cmd_textless{ '<' . $_[0]; } sub do_cmd_textunderscore{ '_' . $_[0]; } sub do_cmd_infinity{ '∞' . $_[0]; } sub do_cmd_plusminus{ '±' . $_[0]; } +sub do_cmd_guilabel{ + return use_wrappers($_[0]. '<span class="guilabel">', '</span>'); } sub do_cmd_menuselection{ - return use_wrappers($_[0], '<span class="menuselection">', '</span>'); } -sub do_cmd_sub{ ' > ' . $_[0]; } + return use_wrappers($_[0], '<span class="guilabel">', '</span>'); } +sub do_cmd_sub{ + return '</span> > <span class="guilabel">' . $_[0]; } # words typeset in a special way (not in HTML though) |