Fix recording keyboard macros in Calc
* lisp/calc/calc.el (calc-unread-command): Prevent recording key twice when defining a keyboard macro. Patch by Christoph Arenz <tiga.arenz@web.de>. Copyright-paperwork-exempt: yes
This commit is contained in:
parent
fcb89237d9
commit
c76b968374
1 changed files with 6 additions and 1 deletions
|
@ -3400,7 +3400,12 @@ See Info node `(calc)Defining Functions'."
|
|||
(cons key key)))
|
||||
|
||||
(defun calc-unread-command (&optional input)
|
||||
(push (or input last-command-event) unread-command-events))
|
||||
(let ((event (or input last-command-event)))
|
||||
;; Avoid recording twice the keys pressed while defining a
|
||||
;; keyboard macro.
|
||||
(when defining-kbd-macro
|
||||
(setq event (cons 'no-record event)))
|
||||
(push event unread-command-events)))
|
||||
|
||||
(defun calc-clear-unread-commands ()
|
||||
(setq unread-command-events nil))
|
||||
|
|
Loading…
Add table
Reference in a new issue