mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-04 22:50:59 -08:00
* bytecomp.el: Declare unread-command-char an obsolete variable.
* vip.el (vip-escape-to-emacs, vip-prefix-arg-value, vip-prefix-arg-com): Use unread-command-event instead of unread-command-char; respect its new semantics. * fortran.el (fortran-abbrev-start, fortran-window-create-momentarily): Same.
This commit is contained in:
parent
4b43edddc0
commit
b8ec3aa307
1 changed files with 2 additions and 2 deletions
|
|
@ -542,7 +542,7 @@ Any other key combination is executed normally."
|
|||
(if (or (= (setq c (read-char)) ??) ;insert char if not equal to `?'
|
||||
(= c help-char))
|
||||
(fortran-abbrev-help)
|
||||
(setq unread-command-char c))))
|
||||
(setq unread-command-event c))))
|
||||
|
||||
(defun fortran-abbrev-help ()
|
||||
"List the currently defined abbrevs in Fortran mode."
|
||||
|
|
@ -605,7 +605,7 @@ See also `fortran-window-create'."
|
|||
(progn (message "Type SPC to continue editing.")
|
||||
(let ((char (read-char)))
|
||||
(or (equal char (string-to-char " "))
|
||||
(setq unread-command-char char))))))
|
||||
(setq unread-command-event char))))))
|
||||
(fortran-window-create)))
|
||||
|
||||
(defun fortran-split-line ()
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue