master 0b4d2bb9b36: universal-argument--preserve: Preserve last-prefix-arg

[Sean Whitton]

branch: master
commit 0b4d2bb9b366ea78e8bc6bf1915d91d4131e98f7
Author: Sean Whitton <spwhitton@spwhitton.name>
Commit: Sean Whitton <spwhitton@spwhitton.name>

    universal-argument--preserve: Preserve last-prefix-arg
    
    * lisp/simple.el (universal-argument--preserve): Set
    current-prefix-arg to last-prefix-arg in order to preserve
    last-prefix-arg, too (bug#71277).
---
 lisp/simple.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index 44197c3189a..76fb81c9df5 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -5414,7 +5414,8 @@ Runs `prefix-command-preserve-state-hook'."
 (add-hook 'prefix-command-preserve-state-hook
           #'universal-argument--preserve)
 (defun universal-argument--preserve ()
-  (setq prefix-arg current-prefix-arg))
+  (setq prefix-arg current-prefix-arg)
+  (setq current-prefix-arg last-prefix-arg))
 
 (defvar universal-argument-map
   (let ((map (make-sparse-keymap))