1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-01 20:06:00 +00:00

* w32-common-fns.el (x-server-version, x-select-enable-clipboard): Declare.

This commit is contained in:
Glenn Morris 2013-09-17 21:34:56 -07:00
parent 5fa89513d5
commit 38702b5be4
2 changed files with 6 additions and 0 deletions

View File

@ -31,6 +31,9 @@
* term/w32-win.el (create-default-fontset): Declare.
* w32-common-fns.el (x-server-version, x-select-enable-clipboard):
Declare.
* window.el (x-display-pixel-height, tool-bar-lines-needed): Declare.
(fit-frame-to-buffer): Explicit error if --without-x.
(mouse-autoselect-window-select): Silence compiler.

View File

@ -23,6 +23,8 @@
;;; and Cygwin Emacs compiled to use the native Windows widget
;;; library.
(declare-function x-server-version "w32fns.c" (&optional terminal))
(defun w32-version ()
"Return the MS-Windows version numbers.
The value is a list of three integers: the major and minor version
@ -100,6 +102,7 @@ in `selection-converter-alist', which see."
;; current selection against it, and avoid passing back our own text
;; from x-selection-value.
(defvar x-last-selected-text nil)
(defvar x-select-enable-clipboard)
(defun x-get-selection-value ()
"Return the value of the current selection.