Replace last-command-char with last-command-event.
This commit is contained in:
parent
51bc9aff5e
commit
61a846fbec
5 changed files with 9 additions and 6 deletions
|
@ -474,7 +474,7 @@ character is inserted ARG times.
|
|||
This command assumes point is not in a string or comment."
|
||||
(interactive "P")
|
||||
(if (not (and open close))
|
||||
(let ((pair (or (assq last-command-char insert-pair-alist)
|
||||
(let ((pair (or (assq last-command-event insert-pair-alist)
|
||||
(assq (event-basic-type last-command-event)
|
||||
insert-pair-alist))))
|
||||
(if pair
|
||||
|
|
|
@ -564,7 +564,7 @@ optional fourth argument FORCE is non-nil."
|
|||
(interactive)
|
||||
|
||||
(setq reb-subexp-displayed
|
||||
(or subexp (string-to-number (format "%c" last-command-char))))
|
||||
(or subexp (string-to-number (format "%c" last-command-event))))
|
||||
(reb-update-modestring)
|
||||
(reb-do-update reb-subexp-displayed))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue