]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/simple.el (blink-matching-open): Better behavior in minibuffer
authorPontus Michael <m.pontus@gmail.com>
Fri, 1 May 2015 17:20:18 +0000 (13:20 -0400)
committerStefan Monnier <monnier@iro.umontreal.ca>
Fri, 1 May 2015 17:20:18 +0000 (13:20 -0400)
lisp/simple.el

index cf1912ade4f7acc7ce0a5359805553b993cc3806..31efe3896d4d7eb068dbfeeb8c8ea53bbb5f1900 100644 (file)
@@ -6992,8 +6992,9 @@ The function should return non-nil if the two tokens do not match.")
                     (buffer-substring blinkpos (1+ blinkpos))))
                   ;; There is nothing to show except the char itself.
                   (t (buffer-substring blinkpos (1+ blinkpos))))))
-            (message "Matches %s"
-                     (substring-no-properties open-paren-line-string)))))))))
+            (minibuffer-message
+             "Matches %s"
+             (substring-no-properties open-paren-line-string)))))))))
 
 (defvar blink-paren-function 'blink-matching-open
   "Function called, if non-nil, whenever a close parenthesis is inserted.