From 8a30a619e2c8d207a7edca9f373c09444099cce6 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Fri, 23 Dec 2005 21:53:29 +0000 Subject: [PATCH] (mouse-choose-completion): Replace `buffer-substring' with `buffer-substring-no-properties' to remove common substring highlighting. --- lisp/mouse.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/mouse.el b/lisp/mouse.el index b5881272835..b92413f7383 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -2230,7 +2230,7 @@ and selects that window." (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) -- 2.39.5