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

(kmacro-bind-to-key): Avoid comparisons on function keys.

parent 0e01e4af
2007-07-15 Richard Stallman <rms@gnu.org>
 
* kmacro.el (kmacro-bind-to-key): Avoid comparisons on function keys.
* tutorial.el (tutorial--find-changed-keys):
Handle C-x specially like ESC.
 
......@@ -795,8 +795,9 @@ may be shaded by a local key binding."
ok cmd)
(when (= (length key-seq) 1)
(let ((ch (aref key-seq 0)))
(if (or (and (>= ch ?0) (<= ch ?9))
(and (>= ch ?A) (<= ch ?Z)))
(if (and (integerp ch)
(or (and (>= ch ?0) (<= ch ?9))
(and (>= ch ?A) (<= ch ?Z))))
(setq key-seq (concat "\C-x\C-k" key-seq)
ok t))))
(when (and (not (equal key-seq ""))
......
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