Mercurial > emacs
changeset 2024:357941278904
(simula-electric-label): Handle any event when flushing the display.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 06 Mar 1993 06:01:29 +0000 |
| parents | 019308ed8918 |
| children | 3f02dc3e10a8 |
| files | lisp/progmodes/simula.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/simula.el Sat Mar 06 05:56:36 1993 +0000 +++ b/lisp/progmodes/simula.el Sat Mar 06 06:01:29 1993 +0000 @@ -401,7 +401,7 @@ (case-fold-search t) ;; don't mix a label with an assignment operator := :- ;; therefore look at next typed character... - (next-char (setq unread-command-events (list (read-char)))) + (next-char (setq unread-command-events (list (read-event)))) (com-char last-command-char)) (unwind-protect ;; Problem: find out if character just read is a command char