Minor cleanliness.

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 7cec9157aec31f77113d5d60e8502e6c8ecccb76..0d0fa773812be1a0f59cedf281e5cc5b3cb49531 100644 (file)
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -58,12 +58,15 @@ sub do_cmd_varvars{
     $_;
 }
 
-sub do_cmd_pytype{
+sub use_current{
     local($_) = @_;
     s|$next_pair_pr_rx|\2|;
     $_;
 }
 
+sub do_cmd_pytype{ use_current(); }
+sub do_cmd_makevar{ use_current(); }
+
 # Logical formatting (some based on texinfo), needs to be converted to
 # minimalist HTML.  The "minimalist" is primarily to reduce the size of
 # output files for users that read them over the network rather than