# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 808585439 0
# Node ID d998327b9011450ee978b510b1915ce2bcfd7cb4
# Parent  1372454cb5e52a173ad4433c4aa63c49ca9dbab9
(show-paren-command-hook): Do nothing if have unread events.

diff -r 1372454cb5e5 -r d998327b9011 lisp/paren.el
--- a/lisp/paren.el	Wed Aug 16 15:03:24 1995 +0000
+++ b/lisp/paren.el	Wed Aug 16 15:03:59 1995 +0000
@@ -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)) ?\))