Mercurial > emacs
changeset 17671:3e65698d4ce9
(mouse-sel-get-selection-function):
Look in x-last-selected-text if necessary.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 05 May 1997 19:55:17 +0000 |
parents | 40d6f66af2bc |
children | 3e14521699ff |
files | lisp/mouse-sel.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse-sel.el Mon May 05 19:53:46 1997 +0000 +++ b/lisp/mouse-sel.el Mon May 05 19:55:17 1997 +0000 @@ -201,7 +201,7 @@ (defvar mouse-sel-get-selection-function (function (lambda (selection) (if (eq selection 'PRIMARY) - (x-cut-buffer-or-selection-value) + (or (x-cut-buffer-or-selection-value) x-last-selected-text) (x-get-selection selection)))) "Function to call to get the selection. Called with one argument: