(blink-matching-open): Don't log paren matching

messages in *Messages*.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/simple.el b/lisp/simple.el
index 6ac05b42179..c5fe25ebe07 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3322,7 +3322,8 @@ when it is off screen)."
                               (matching-paren (char-after blinkpos))))))
            (if mismatch (setq blinkpos nil))
            (if blinkpos
-               (progn
+               ;; Don't log messages about paren matching.
+               (let (message-log-max)
                 (goto-char blinkpos)
                 (if (pos-visible-in-window-p)
                     (and blink-matching-paren-on-screen