diff options
| author | Stefan Monnier | 2014-10-22 21:38:59 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2014-10-22 21:38:59 -0400 |
| commit | d361bcfbc7a69737ccd383e127fc8744c80cf5b4 (patch) | |
| tree | 0a900898735e6daefe02ead8f846fe1c37f3539a /lisp/select.el | |
| parent | 6a7884caf2a6f4a7fb7faa9ba275163d40f6bd96 (diff) | |
| download | emacs-d361bcfbc7a69737ccd383e127fc8744c80cf5b4.tar.gz emacs-d361bcfbc7a69737ccd383e127fc8744c80cf5b4.zip | |
* lisp/select.el: Use lexical-binding.
(gui-set-selection): Provide an implementation for non-GUI frames.
* lisp/term/x-win.el: Use lexical-binding.
(x-clipboard-yank): Fix up missed renamings.
* lisp/term/w32-win.el (libgif-version, libjpeg-version): Silence compiler.
(w32--set-selection): Fix up var names.
* lisp/term/pc-win.el: Use lexical-binding.
(w16-selection-exists-p): Silence compiler warning.
(w16-selection-owner-p): Fix up missed renamings.
* lisp/emacs-lisp/bytecomp.el (byte-compile-form): Remove left-over debug.
* lisp/frame.el (frame-notice-user-settings): Fix excessive quoting.
Fixes: debbugs:18791
Diffstat (limited to 'lisp/select.el')
| -rw-r--r-- | lisp/select.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/select.el b/lisp/select.el index 6b7d32296ea..2ce0ef0d7e6 100644 --- a/lisp/select.el +++ b/lisp/select.el | |||
| @@ -1,4 +1,4 @@ | |||
| 1 | ;;; select.el --- lisp portion of standard selection support | 1 | ;;; select.el --- lisp portion of standard selection support -*- lexical-binding:t -*- |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1993-1994, 2001-2014 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1993-1994, 2001-2014 Free Software Foundation, Inc. |
| 4 | 4 | ||
| @@ -255,7 +255,7 @@ SELECTION-SYMBOL is typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. | |||
| 255 | \(Those are literal upper-case symbol names, since that's what X expects.) | 255 | \(Those are literal upper-case symbol names, since that's what X expects.) |
| 256 | TARGET-TYPE is the type of data desired, typically `STRING'.") | 256 | TARGET-TYPE is the type of data desired, typically `STRING'.") |
| 257 | 257 | ||
| 258 | (gui-method-declare gui-set-selection nil | 258 | (gui-method-declare gui-set-selection #'ignore |
| 259 | "Method to assert a selection of type SELECTION and value VALUE. | 259 | "Method to assert a selection of type SELECTION and value VALUE. |
| 260 | SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. | 260 | SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. |
| 261 | If VALUE is nil and we own the selection SELECTION, disown it instead. | 261 | If VALUE is nil and we own the selection SELECTION, disown it instead. |