[Emacs-diffs] Changes to emacs/lisp/term/x-win.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/term/x-win.el
diff -c emacs/lisp/term/x-win.el:1.165.2.3 emacs/lisp/term/x-win.el:1.165.2.4
*** emacs/lisp/term/x-win.el:1.165.2.3  Fri Apr 16 12:50:37 2004
--- emacs/lisp/term/x-win.el    Mon Jun 28 07:29:49 2004
***************
*** 2438,2444 ****
  (defun x-clipboard-yank ()
    "Insert the clipboard contents, or the last stretch of killed text."
    (interactive)
!   (let ((clipboard-text (x-get-selection 'CLIPBOARD))
        (x-select-enable-clipboard t))
      (if (and clipboard-text (> (length clipboard-text) 0))
        (kill-new clipboard-text))
--- 2438,2447 ----
  (defun x-clipboard-yank ()
    "Insert the clipboard contents, or the last stretch of killed text."
    (interactive)
!   (let ((clipboard-text 
!        (condition-case nil
!            (x-get-selection 'CLIPBOARD)
!          (error nil)))
        (x-select-enable-clipboard t))
      (if (and clipboard-text (> (length clipboard-text) 0))
        (kill-new clipboard-text))