Commit fca4b775 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(describe-key-briefly): Don't set `foo'.

parent 41752cf1
......@@ -108,7 +108,7 @@
(if (listp type) (setq type (car type)))
(and (symbolp type)
(memq 'down (event-modifiers type))
(setq foo (read-event))))
(let ((defn (key-binding key)))
(if (or (null defn) (integerp defn))
(message "%s is undefined" (key-description key))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment