Don't strip properties in show-paren-function

* lisp/paren.el (show-paren-function): Don't strip text properties
(bug#51606) because that makes the offscreen context less
informative.

diff --git a/lisp/paren.el b/lisp/paren.el
index a1f74f2097e992773b1ddef639e16f9ecca416d1..0065bba72e7158400bb791fbdcbe4b63f809fdd5 100644 (file)
--- a/lisp/paren.el
+++ b/lisp/paren.el
@@ -330,9 +330,7 @@ It is the default value of `show-paren-data-function'."
                 (let ((open-paren-line-string
                        (blink-paren-open-paren-line-string openparen))
                       (message-log-max nil))
-                  (minibuffer-message
-                   "Matches %s"
-                   (substring-no-properties open-paren-line-string)))))
+                  (minibuffer-message "Matches %s" open-paren-line-string))))
           ;; Always set the overlay face, since it varies.
           (overlay-put show-paren--overlay 'priority show-paren-priority)
           (overlay-put show-paren--overlay 'face face))))))