--- a/Doc/perl/python.perl	Sat Apr 04 04:18:06 1998 +0000
+++ b/Doc/perl/python.perl	Sat Apr 04 04:19:20 1998 +0000
@@ -58,12 +58,15 @@
     $_;
 }
 
-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