diff options
Diffstat (limited to 'lisp/repeat.el')
| -rw-r--r-- | lisp/repeat.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/repeat.el b/lisp/repeat.el index 86484ec68d6..abab47e7dc8 100644 --- a/lisp/repeat.el +++ b/lisp/repeat.el | |||
| @@ -335,7 +335,7 @@ recently executed command not bound to an input event\"." | |||
| 335 | (setq real-last-command 'repeat) | 335 | (setq real-last-command 'repeat) |
| 336 | (setq repeat-undo-count 1) | 336 | (setq repeat-undo-count 1) |
| 337 | (unwind-protect | 337 | (unwind-protect |
| 338 | (while (let ((evt (read-event))) ;FIXME: read-key maybe? | 338 | (while (let ((evt (read-key))) |
| 339 | ;; For clicks, we need to strip the meta-data to | 339 | ;; For clicks, we need to strip the meta-data to |
| 340 | ;; check the underlying event name. | 340 | ;; check the underlying event name. |
| 341 | (eq (or (car-safe evt) evt) | 341 | (eq (or (car-safe evt) evt) |