summaryrefslogtreecommitdiff
path: root/lisp/paren.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-01-17 22:43:40 +0000
committerRichard M. Stallman <rms@gnu.org>1994-01-17 22:43:40 +0000
commite4b93bab487214aa3ed98629d6d24aef28973b6e (patch)
treeb37f378df4be60003819f06690ca1bad59216451 /lisp/paren.el
parentb6173caec23a539f3a69c3ce437ba430d1ae0666 (diff)
downloademacs-e4b93bab487214aa3ed98629d6d24aef28973b6e.tar.gz
(show-paren-command-hook): Do nothing when in kbd macro.
Diffstat (limited to 'lisp/paren.el')
-rw-r--r--lisp/paren.el3
1 files changed, 2 insertions, 1 deletions
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)) ?\()