Minor cleanliness.

1 files changed, 4 insertions, 1 deletions

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 7cec915..0d0fa77 100644
--- 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