repeat-mode: Setting `repeat-map' property to a keymap object fails

[Narendra Joshi]

Hi,

I tried to use a `keymap' object as the value of the `repeat-map'
property of a symbol/command and it failed. I think the change below
would avoid the problem. The problem is that `boundp` throws an error
for anything other than a symbol value.

--8<---------------cut here---------------start------------->8---
---
 lisp/repeat.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/repeat.el b/lisp/repeat.el
index 4dcd353e34..32ffb1884f 100644
--- a/lisp/repeat.el
+++ b/lisp/repeat.el
@@ -416,7 +416,7 @@ repeat-post-hook
                          (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)))
 
-- 
2.33.1
--8<---------------cut here---------------end--------------->8---


Best,
-- 
Narendra Joshi