comparison lisp/term/pc-win.el @ 111734:e492c86d8f6c

term/pc-win.el (x-get-selection-internal): Emulation for MS-DOS.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 26 Nov 2010 20:38:40 +0200
parents 72ef880ed198
children 417b1e4d63cd
comparison
equal deleted inserted replaced
111733:3a6d978e6636 111734:e492c86d8f6c
285 (defun x-disown-selection-internal (selection &optional time) 285 (defun x-disown-selection-internal (selection &optional time)
286 "If we own the selection SELECTION, disown it. 286 "If we own the selection SELECTION, disown it.
287 Disowning it means there is no such selection." 287 Disowning it means there is no such selection."
288 (if (x-selection-owner-p selection) 288 (if (x-selection-owner-p selection)
289 t)) 289 t))
290
291 ;; x-get-selection-internal is used in select.el
292 (defun x-get-selection-internal (selection type &optional time_stamp)
293 "Return text selected from some X window.
294 SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'.
295 \(Those are literal upper-case symbol names, since that's what X expects.)
296 TYPE is the type of data desired, typically `STRING'.
297 TIME_STAMP is the time to use in the XConvertSelection call for foreign
298 selections. If omitted, defaults to the time for the last event."
299 (x-get-selection-value))
290 300
291 ;; From src/fontset.c: 301 ;; From src/fontset.c:
292 (fset 'query-fontset 'ignore) 302 (fset 'query-fontset 'ignore)
293 303
294 ;; From lisp/term/x-win.el: make iconify-or-deiconify-frame a no-op. 304 ;; From lisp/term/x-win.el: make iconify-or-deiconify-frame a no-op.