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

[Juri Linkov]

> 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.
>
> 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)))

Thanks, fixed now.