changeset 5623:d571ad3c796e

(show-paren-command-hook): Do nothing when in kbd macro.
author Richard M. Stallman <rms@gnu.org>
date Mon, 17 Jan 1994 22:43:40 +0000
parents dc61f16f4f79
children 76f618230217
files lisp/paren.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/paren.el	Mon Jan 17 21:44:35 1994 +0000
+++ b/lisp/paren.el	Mon Jan 17 22:43:40 1994 +0000
@@ -43,8 +43,9 @@
 ;; and show it until input arrives.
 (defun show-paren-command-hook ()
   ;; 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 (sit-for 0))
+  (if (and window-system (not executing-kbd-macro) (sit-for 0))
       (let (pos dir mismatch (oldpos (point))
 		(face show-paren-face))
 	(cond ((eq (char-syntax (following-char)) ?\()