diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-08-16 15:03:59 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-08-16 15:03:59 +0000 |
| commit | d5533677aa42c3aeb89b08cf24602fdce043c321 (patch) | |
| tree | 32bdfb87e05a5a23d2224f114651ca23968c1f80 /lisp/paren.el | |
| parent | 447cb07465cdbb72cf52584a8220e256e95942c2 (diff) | |
| download | emacs-d5533677aa42c3aeb89b08cf24602fdce043c321.tar.gz | |
(show-paren-command-hook): Do nothing if have unread events.
Diffstat (limited to 'lisp/paren.el')
| -rw-r--r-- | lisp/paren.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/paren.el b/lisp/paren.el index 0a151d14aab..656c4df5c5c 100644 --- a/lisp/paren.el +++ b/lisp/paren.el @@ -45,7 +45,9 @@ ;; Do nothing if no window system to display results with. ;; Do nothing if executing keyboard macro. ;; Do nothing if input is pending. - (if (and window-system (not executing-kbd-macro) (sit-for 0 100)) + (if (and window-system (not executing-kbd-macro) + (not unread-command-events) + (sit-for 0 100)) (let (pos dir mismatch (oldpos (point)) (face show-paren-face)) (cond ((eq (char-syntax (preceding-char)) ?\)) |