procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

universal-argument--preserve: Preserve last-prefix-arg

Browse source 
* lisp/simple.el (universal-argument--preserve): Set
current-prefix-arg to last-prefix-arg in order to preserve
last-prefix-arg, too (bug#71277).
This commit is contained in:
Sean Whitton 2024-05-30 12:45:57 +01:00
parent ae7d0e86b3
commit 0b4d2bb9b3
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/simple.el
View file

@ -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))