diff options
| -rw-r--r-- | lisp/simple.el | 3 |
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'." | |||
| 5414 | (add-hook 'prefix-command-preserve-state-hook | 5414 | (add-hook 'prefix-command-preserve-state-hook |
| 5415 | #'universal-argument--preserve) | 5415 | #'universal-argument--preserve) |
| 5416 | (defun universal-argument--preserve () | 5416 | (defun universal-argument--preserve () |
| 5417 | (setq prefix-arg current-prefix-arg)) | 5417 | (setq prefix-arg current-prefix-arg) |
| 5418 | (setq current-prefix-arg last-prefix-arg)) | ||
| 5418 | 5419 | ||
| 5419 | (defvar universal-argument-map | 5420 | (defvar universal-argument-map |
| 5420 | (let ((map (make-sparse-keymap)) | 5421 | (let ((map (make-sparse-keymap)) |