From e4b93bab487214aa3ed98629d6d24aef28973b6e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 17 Jan 1994 22:43:40 +0000 Subject: [PATCH] (show-paren-command-hook): Do nothing when in kbd macro. --- lisp/paren.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/paren.el b/lisp/paren.el index c4e5bceb4d6..14d2d0c5b0d 100644 --- a/lisp/paren.el +++ b/lisp/paren.el @@ -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)) ?\() -- 2.39.5