Mercurial > emacs

changeset 67779:01ba52243e5f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mouse-choose-completion): Replace `buffer-substring' with `buffer-substring-no-properties' to remove common substring highlighting.
author Juri Linkov <juri@jurta.org>
date Fri, 23 Dec 2005 21:53:29 +0000
parents 0c0bb618627a
children 6f62623c8c61
files lisp/mouse.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mouse.el	Fri Dec 23 21:52:00 2005 +0000
+++ b/lisp/mouse.el	Fri Dec 23 21:53:29 2005 +0000
@@ -2230,7 +2230,7 @@
 	  (setq beg (previous-single-property-change beg 'mouse-face))
 	  (setq end (or (next-single-property-change end 'mouse-face)
 			(point-max)))
-	  (setq choice (buffer-substring beg end)))))
+	  (setq choice (buffer-substring-no-properties beg end)))))
     (let ((owindow (selected-window)))
       (select-window (posn-window (event-start event)))
       (if (and (one-window-p t 'selected-frame)