comparison lisp/term/x-win.el @ 1265:cfda1fa93624

*** empty log message ***

1264:6ba9d5aaace6

;;; If you are running xclipboard, this means you can effectively
;;; have a window on a copy of the kill-ring.
;;; Also, set the value of X cut buffer 0, for backward compatibility
;;; with older X application.
(defun x-select-text (text)
  (x-own-selection text 'clipboard)
  (x-own-selection text)
  (setq x-last-selected-text text))

;;; Return the value of the current X selection.  For compatibility

1265:cfda1fa93624

;;; If you are running xclipboard, this means you can effectively
;;; have a window on a copy of the kill-ring.
;;; Also, set the value of X cut buffer 0, for backward compatibility
;;; with older X application.
(defun x-select-text (text)
  (x-set-cut-buffer 0 text)
  (x-own-selection text 'clipboard)
  (x-own-selection text)
  (setq x-last-selected-text text))

;;; Return the value of the current X selection.  For compatibility