* lisp/repeat.el (repeat-post-hook): Add check symbolp rep-map.

Copyright-paperwork-exempt: yes

diff --git a/lisp/repeat.el b/lisp/repeat.el
index 4dcd353e346d374b25235e362e9c090105a8de34..32ffb1884f342b6edc84f1964f16744dc7a79c42 100644 (file)
--- 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)))