summaryrefslogtreecommitdiff
path: root/lisp/select.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2002-06-05 17:14:16 +0000
committerEli Zaretskii <eliz@gnu.org>2002-06-05 17:14:16 +0000
commitd176a839b02506ddd4b3a0f0611c6a2339690b20 (patch)
tree742ad302011c3f662cc9bdf05e92c663767973fc /lisp/select.el
parentebadb1e47f8ca120987064b4a912602ed5f7b19b (diff)
downloademacs-d176a839b02506ddd4b3a0f0611c6a2339690b20.tar.gz
(xselect-convert-to-string): If VALUE is a string,
return a cons of TYPE and the string.
Diffstat (limited to 'lisp/select.el')
-rw-r--r--lisp/select.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/select.el b/lisp/select.el
index 85ca927d7ef..801db31cb61 100644
--- a/lisp/select.el
+++ b/lisp/select.el
@@ -134,7 +134,9 @@ Cut buffers are considered obsolete; you should use selections instead."
(defun xselect-convert-to-string (selection type value)
(cond ((stringp value)
- value)
+ ;; Return the type as well, so that xselect.c could honor
+ ;; requests whose type is STRING.
+ (cons type value))
((overlayp value)
(save-excursion
(or (buffer-name (overlay-buffer value))