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)

diff --git a/lisp/select.el b/lisp/select.el
index 74b48d1d81266b7ae69d0d2c0a1897f5f55a808a..2d2ac5fa422170a3e4a6e70bc50ff2016cae334f 100644 (file)
--- 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)."
 
 (defun gui-get-primary-selection ()
   "Return the PRIMARY selection, or the best emulation thereof."
-  (or (gui-get-selection 'PRIMARY)
+  (or (gui--selection-value-internal 'PRIMARY)
       (and (fboundp 'w32-get-selection-value)
            (eq (framep (selected-frame)) 'w32)
            ;; MS-Windows emulates PRIMARY in x-get-selection, but only