Commit bac79b51 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(show-paren-command-hook): Do nothing if input is pending.

parent c45a32d4
......@@ -42,7 +42,9 @@
;; Find the place to show, if there is one,
;; and show it until input arrives.
(defun show-paren-command-hook ()
(if window-system
;; Do nothing if no window system to display results with.
;; Do nothing if input is pending.
(if (and window-system (sit-for 0))
(let (pos dir mismatch (oldpos (point))
(face show-paren-face))
(cond ((eq (char-syntax (following-char)) ?\()
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment