[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-28 588caf0: * lisp/repeat.el (repeat-post-hook): Add check symbolp
From: |
Juri Linkov |
Subject: |
emacs-28 588caf0: * lisp/repeat.el (repeat-post-hook): Add check symbolp rep-map. |
Date: |
Thu, 25 Nov 2021 02:59:22 -0500 (EST) |
branch: emacs-28
commit 588caf0b274e763bab0ac511f2cb95750e83f7f6
Author: Narendra Joshi <narendraj9@gmail.com>
Commit: Juri Linkov <juri@linkov.net>
* lisp/repeat.el (repeat-post-hook): Add check symbolp rep-map.
Copyright-paperwork-exempt: yes
---
lisp/repeat.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/repeat.el b/lisp/repeat.el
index 4dcd353..32ffb18 100644
--- a/lisp/repeat.el
+++ b/lisp/repeat.el
@@ -416,7 +416,7 @@ See `describe-repeat-maps' for a list of all repeatable
commands."
(and (symbolp real-this-command)
(get real-this-command 'repeat-map)))))
(when rep-map
- (when (boundp rep-map)
+ (when (and (symbolp rep-map) (boundp rep-map))
(setq rep-map (symbol-value rep-map)))
(let ((map (copy-keymap rep-map)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-28 588caf0: * lisp/repeat.el (repeat-post-hook): Add check symbolp rep-map.,
Juri Linkov <=