Mercurial > emacs
changeset 21710:70d6549a4105
(x-select-text, x-get-selection-value): Replace win16 with w16.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Wed, 22 Apr 1998 13:45:00 +0000 |
| parents | 64adf1f4d54d |
| children | 2aa9965afd39 |
| files | lisp/term/pc-win.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/pc-win.el Wed Apr 22 13:39:59 1998 +0000 +++ b/lisp/term/pc-win.el Wed Apr 22 13:45:00 1998 +0000 @@ -339,7 +339,7 @@ The value may be different for frames on different X displays." x-colors) -;; From lisp/term/win32-win.el +;; From lisp/term/w32-win.el ; ;;;; Selections and cut buffers ; @@ -354,7 +354,7 @@ (defun x-select-text (text &optional push) (if x-select-enable-clipboard - (win16-set-clipboard-data text)) + (w16-set-clipboard-data text)) (setq x-last-selected-text text)) ;;; Return the value of the current selection. @@ -365,8 +365,8 @@ (let (text) ;; Don't die if x-get-selection signals an error. (condition-case c - (setq text (win16-get-clipboard-data)) - (error (message "win16-get-clipboard-data:%s" c))) + (setq text (w16-get-clipboard-data)) + (error (message "w16-get-clipboard-data:%s" c))) (if (string= text "") (setq text nil)) (cond ((not text) nil)