diff options
| author | Richard M. Stallman | 1992-06-09 20:07:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1992-06-09 20:07:02 +0000 |
| commit | 17c17ec9b4d09ab35789c3c158aed6a4ab84f53f (patch) | |
| tree | 00da52d1a0dde45dd2b6b18343c4ad5606fab909 | |
| parent | 74c9690c44a6da07dbb05dba64e3f5e8ba58b2fc (diff) | |
| download | emacs-17c17ec9b4d09ab35789c3c158aed6a4ab84f53f.tar.gz emacs-17c17ec9b4d09ab35789c3c158aed6a4ab84f53f.zip | |
*** empty log message ***
| -rw-r--r-- | lisp/electric.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/electric.el b/lisp/electric.el index 50e2a015389..775c7b246f0 100644 --- a/lisp/electric.el +++ b/lisp/electric.el | |||
| @@ -95,6 +95,7 @@ | |||
| 95 | (if cmd | 95 | (if cmd |
| 96 | (condition-case conditions | 96 | (condition-case conditions |
| 97 | (progn (command-execute cmd) | 97 | (progn (command-execute cmd) |
| 98 | (setq last-command this-command) | ||
| 98 | (if (or (prog1 quit-flag (setq quit-flag nil)) | 99 | (if (or (prog1 quit-flag (setq quit-flag nil)) |
| 99 | (= last-input-char ?\C-g)) | 100 | (= last-input-char ?\C-g)) |
| 100 | (progn (setq unread-command-char -1) | 101 | (progn (setq unread-command-char -1) |