mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-11 16:08:13 +00:00
Code Issues Releases Activity

(show-paren-command-hook): Do nothing when in kbd macro.

Browse Source
This commit is contained in:
Richard M. Stallman 1994-01-17 22:43:40 +00:00
parent b6173caec2
commit e4b93bab48
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/paren.el
View File

@ -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)) ?\()