changeset 45647:e4adbf26467d

(xselect-convert-to-string): If VALUE is a string, return a cons of TYPE and the string.
author Eli Zaretskii <eliz@gnu.org>
date Wed, 05 Jun 2002 17:14:16 +0000
parents a6d15407eba5
children bd5e72f0cf8e
files lisp/select.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/select.el	Wed Jun 05 17:02:15 2002 +0000
+++ b/lisp/select.el	Wed Jun 05 17:14:16 2002 +0000
@@ -134,7 +134,9 @@
 
 (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))