diff options
-rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 5f58d18e74..13c44666a3 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2482,6 +2482,8 @@ it were the arg to `interactive' (which see) to interactively read the value." (set-buffer buffer) (choose-completion-delete-max-match choice) (insert choice) + (remove-text-properties (- (point) (length choice)) (point) + '(mouse-face nil)) ;; Update point in the window that BUFFER is showing in. (let ((window (get-buffer-window buffer t))) (set-window-point window (point))) |