diff options
Diffstat (limited to 'lisp/term/pc-win.el')
| -rw-r--r-- | lisp/term/pc-win.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/term/pc-win.el b/lisp/term/pc-win.el index ecc5ff3ca54..0e40d51daf7 100644 --- a/lisp/term/pc-win.el +++ b/lisp/term/pc-win.el @@ -181,15 +181,15 @@ support other types of selections." :group 'killing) (defun x-select-text (text &optional push) - (if x-select-enable-clipboard + (if x-select-enable-clipboard (w16-set-clipboard-data text)) (setq x-last-selected-text text)) - + ;;; Return the value of the current selection. ;;; Consult the selection, then the cut buffer. Treat empty strings ;;; as if they were unset. (defun x-get-selection-value () - (if x-select-enable-clipboard + (if x-select-enable-clipboard (let (text) ;; Don't die if x-get-selection signals an error. (condition-case c |