diff options
| author | Mike FABIAN | 2015-10-08 15:45:32 +0200 |
|---|---|---|
| committer | Andreas Schwab | 2015-10-12 10:34:51 +0200 |
| commit | 1a588cb6dcfc2d9db4c1753ac7ba62ba97ee8d67 (patch) | |
| tree | 2ce57176e7b84b5f26b7aa7c30472928d362590c | |
| parent | 70c811c0479125f1bab27c7c0b9b4a79d659035d (diff) | |
| download | emacs-1a588cb6dcfc2d9db4c1753ac7ba62ba97ee8d67.tar.gz emacs-1a588cb6dcfc2d9db4c1753ac7ba62ba97ee8d67.zip | |
In gui-get-primary-selection use gui--selection-value-internal (Bug#20906)
* lisp/select.el (gui-get-primary-selection): In gui-get-primary-selection
use gui--selection-value-internal (Bug#20906)
| -rw-r--r-- | lisp/select.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/select.el b/lisp/select.el index 74b48d1d812..2d2ac5fa422 100644 --- a/lisp/select.el +++ b/lisp/select.el | |||
| @@ -235,7 +235,7 @@ The value nil is the same as the list (UTF8_STRING COMPOUND_TEXT STRING)." | |||
| 235 | 235 | ||
| 236 | (defun gui-get-primary-selection () | 236 | (defun gui-get-primary-selection () |
| 237 | "Return the PRIMARY selection, or the best emulation thereof." | 237 | "Return the PRIMARY selection, or the best emulation thereof." |
| 238 | (or (gui-get-selection 'PRIMARY) | 238 | (or (gui--selection-value-internal 'PRIMARY) |
| 239 | (and (fboundp 'w32-get-selection-value) | 239 | (and (fboundp 'w32-get-selection-value) |
| 240 | (eq (framep (selected-frame)) 'w32) | 240 | (eq (framep (selected-frame)) 'w32) |
| 241 | ;; MS-Windows emulates PRIMARY in x-get-selection, but only | 241 | ;; MS-Windows emulates PRIMARY in x-get-selection, but only |