diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-10-09 23:28:24 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-10-09 23:28:24 -0400 |
| commit | a27cd28f9593138b430938854d7613f9029a94a9 (patch) | |
| tree | 78ec9459774e3ab26acd83b19d5ef555aab6fae3 /lisp/term/pc-win.el | |
| parent | cd0351b20288ea6edd7a958317114f029a76c1c1 (diff) | |
| download | emacs-a27cd28f9593138b430938854d7613f9029a94a9.tar.gz emacs-a27cd28f9593138b430938854d7613f9029a94a9.tar.bz2 emacs-a27cd28f9593138b430938854d7613f9029a94a9.zip | |
* lisp/select.el (gui-selection-exists-p-alist): New method.
* lisp/menu-bar.el (menu-bar-edit-menu, clipboard-yank):
* lisp/simple.el (deactivate-mark): Use it.
* lisp/term/x-win.el (gui-selection-exists-p):
* lisp/term/w32-win.el (gui-selection-exists-p):
* lisp/term/pc-win.el (gui-selection-exists-p):
* lisp/term/ns-win.el (gui-selection-exists-p): Provide a backend instance.
Diffstat (limited to 'lisp/term/pc-win.el')
| -rw-r--r-- | lisp/term/pc-win.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/term/pc-win.el b/lisp/term/pc-win.el index a7507377bda..7c2b8d6dff0 100644 --- a/lisp/term/pc-win.el +++ b/lisp/term/pc-win.el @@ -228,6 +228,7 @@ Consult the selection. Treat empty strings as if they were unset." (w16-get-clipboard-data)))) ;; gui-selection-owner-p is used in simple.el. +(gui-method-define gui-selection-exists-p pc #'x-selection-exists-p) (gui-method-define gui-selection-owner-p pc #'w16-selection-owner-p) (defun w16-selection-owner-p (_selection) ;; FIXME: Other systems don't obey gui-select-enable-clipboard here. |