# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1290796720 -7200
# Node ID e492c86d8f6ced3851a36c03bc43a8427d421a4a
# Parent  3a6d978e6636b6076c52065391501afba31c8c2b
term/pc-win.el (x-get-selection-internal): Emulation for MS-DOS.

diff -r 3a6d978e6636 -r e492c86d8f6c lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Nov 26 20:15:09 2010 +0200
+++ b/lisp/ChangeLog	Fri Nov 26 20:38:40 2010 +0200
@@ -1,3 +1,7 @@
+2010-11-26  Eli Zaretskii  <eliz@gnu.org>
+
+	* term/pc-win.el (x-get-selection-internal): Emulation for MS-DOS.
+
 2010-11-26  Glenn Morris  <rgm@gnu.org>
 
 	* calendar/diary-lib.el (diary-outlook-format-1): New function, so that
diff -r 3a6d978e6636 -r e492c86d8f6c lisp/term/pc-win.el
--- a/lisp/term/pc-win.el	Fri Nov 26 20:15:09 2010 +0200
+++ b/lisp/term/pc-win.el	Fri Nov 26 20:38:40 2010 +0200
@@ -288,6 +288,16 @@
   (if (x-selection-owner-p selection)
       t))
 
+;; x-get-selection-internal is used in select.el
+(defun x-get-selection-internal (selection type &optional time_stamp)
+  "Return text selected from some X window.
+SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'.
+\(Those are literal upper-case symbol names, since that's what X expects.)
+TYPE is the type of data desired, typically `STRING'.
+TIME_STAMP is the time to use in the XConvertSelection call for foreign
+selections.  If omitted, defaults to the time for the last event."
+  (x-get-selection-value))
+
 ;; From src/fontset.c:
 (fset 'query-fontset 'ignore)