diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-01-17 22:43:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-01-17 22:43:40 +0000 |
| commit | 94400c96f88c79feda5aa0e2b63fec1fd280b1d7 (patch) | |
| tree | dbf772edf4b1669cab40633665927a740d792eac /lisp/paren.el | |
| parent | 3686c139b7de56adf208d7f41b1eceffb8ea7ddf (diff) | |
| download | emacs-94400c96f88c79feda5aa0e2b63fec1fd280b1d7.tar.gz | |
(show-paren-command-hook): Do nothing when in kbd macro.
Diffstat (limited to 'lisp/paren.el')
| -rw-r--r-- | lisp/paren.el | 3 |
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)) ?\() |