diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 13:30:45 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 13:30:45 +0000 |
| commit | db95369be096960245dd38678f68464627698678 (patch) | |
| tree | 13e3aa7b917b87ec343a8b0d053a9c3cb06c05d0 /lisp/term/pc-win.el | |
| parent | a1506d2977a8c2eb982ad0b59416009cdfaa6f51 (diff) | |
| download | emacs-db95369be096960245dd38678f68464627698678.tar.gz | |
Trailing whitespace deleted.
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 |