diff options
| author | Kim F. Storm <storm@cua.dk> | 2002-09-09 22:45:03 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2002-09-09 22:45:03 +0000 |
| commit | f5e130577e9c1c43a4ea58b1062bff6b43346f7a (patch) | |
| tree | 175273f8087f4c362d923928aa34b5204c578023 /lisp | |
| parent | f732f824ad4fcea0c567e5ae3b14531425f9bc8f (diff) | |
| download | emacs-f5e130577e9c1c43a4ea58b1062bff6b43346f7a.tar.gz emacs-f5e130577e9c1c43a4ea58b1062bff6b43346f7a.tar.bz2 emacs-f5e130577e9c1c43a4ea58b1062bff6b43346f7a.zip | |
(keyboard-quit): Set defining-kbd-macro to nil to
cancel defining keyboard macro when applicablex.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/simple.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 79c3e561af6..6d1dbe1db7c 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3418,6 +3418,7 @@ During execution of Lisp code, this character causes a quit directly. At top-level, as an editor command, this simply beeps." (interactive) (deactivate-mark) + (setq defining-kbd-macro nil) (signal 'quit nil)) (define-key global-map "\C-g" 'keyboard-quit) |