(simula-electric-label): Handle any event when flushing the display.
This commit is contained in:
@@ -401,7 +401,7 @@ The relative indentation among the lines of the statement are preserved."
|
||||
(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
|
||||
|
||||
Reference in New Issue
Block a user