diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-05-05 19:55:17 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-05-05 19:55:17 +0000 |
| commit | a416bfa85ba6111eec3e8775c586ba68113c592e (patch) | |
| tree | 6bb32177366c613357408d7c23098a5ba1f7bc72 /lisp/mouse-sel.el | |
| parent | d854d8397ff55f5c21824ea3e8656712c26e3047 (diff) | |
| download | emacs-a416bfa85ba6111eec3e8775c586ba68113c592e.tar.gz | |
(mouse-sel-get-selection-function):
Look in x-last-selected-text if necessary.
Diffstat (limited to 'lisp/mouse-sel.el')
| -rw-r--r-- | lisp/mouse-sel.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el index fdcd9a3e623..e86737c197f 100644 --- a/lisp/mouse-sel.el +++ b/lisp/mouse-sel.el @@ -201,7 +201,7 @@ for them.") (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: |