summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/simple.el3
1 files changed, 2 insertions, 1 deletions
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))