# HG changeset patch # User Glenn Morris # Date 1287885441 25200 # Node ID a3c68a313b8181bc5e8aa4f8b8239245cd4ca192 # Parent d9b0552c39a61cca1b72e195621867cb68a558f6 Reduce duplicate definitions of x-select-enable-clipboard from 3 to 2. * lisp/w32-vars.el (x-select-enable-clipboard): * lisp/term/x-win.el (x-select-enable-clipboard): Move to common-win. * lisp/term/common-win.el (x-select-enable-clipboard): Move here. diff -r d9b0552c39a6 -r a3c68a313b81 lisp/ChangeLog --- a/lisp/ChangeLog Sat Oct 23 18:48:39 2010 -0700 +++ b/lisp/ChangeLog Sat Oct 23 18:57:21 2010 -0700 @@ -1,5 +1,9 @@ 2010-10-24 Glenn Morris + * w32-vars.el (x-select-enable-clipboard): + * term/x-win.el (x-select-enable-clipboard): Move to common-win. + * term/common-win.el (x-select-enable-clipboard): Move here. + * term/tty-colors.el (tty-defined-color-alist): Remove duplicate definition of C variable. diff -r d9b0552c39a6 -r a3c68a313b81 lisp/term/common-win.el --- a/lisp/term/common-win.el Sat Oct 23 18:48:39 2010 -0700 +++ b/lisp/term/common-win.el Sat Oct 23 18:57:21 2010 -0700 @@ -25,6 +25,17 @@ ;;; Code: +(defcustom x-select-enable-clipboard t + "Non-nil means cutting and pasting uses the clipboard. +This is in addition to, but in preference to, the primary selection. + +Note that MS-Windows does not support selection types other than the +clipboard. \(The primary selection that is set by Emacs is not +accessible to other programs on MS-Windows.\)" + :type 'boolean + :group 'killing + ;; The GNU/Linux version changed in 24.1, the MS-Windows version did not. + :version "24.1") (defvar x-invocation-args) @@ -371,5 +382,4 @@ For Nextstep, this is a list of non-PANTONE colors returned by the operating system.") -;; arch-tag: 2a128601-99cc-401e-9dff-0ee6a36102ef ;;; common-win.el ends here diff -r d9b0552c39a6 -r a3c68a313b81 lisp/term/x-win.el --- a/lisp/term/x-win.el Sat Oct 23 18:48:39 2010 -0700 +++ b/lisp/term/x-win.el Sat Oct 23 18:57:21 2010 -0700 @@ -1206,17 +1206,6 @@ "The value of the PRIMARY X selection last time we selected or pasted text.") -(defcustom x-select-enable-clipboard t - "Non-nil means cutting and pasting uses the clipboard. -This is in addition to, but in preference to, the primary selection. - -Note that MS-Windows does not support selection types other than the -clipboard. \(The primary selection that is set by Emacs is not -accessible to other programs on MS-Windows.\)" - :type 'boolean - :group 'killing - :version "24.1") - (defcustom x-select-enable-primary nil "Non-nil means cutting and pasting uses the primary selection." :type 'boolean diff -r d9b0552c39a6 -r a3c68a313b81 lisp/w32-vars.el --- a/lisp/w32-vars.el Sat Oct 23 18:48:39 2010 -0700 +++ b/lisp/w32-vars.el Sat Oct 23 18:57:21 2010 -0700 @@ -148,16 +148,6 @@ (string :tag "Font"))))))) :group 'w32) -(defcustom x-select-enable-clipboard t - "Non-nil means cutting and pasting uses the clipboard. -This is in addition to, but in preference to, the primary selection. - -Note that MS-Windows does not support selection types other than the -clipboard. \(The primary selection that is set by Emacs is not -accessible to other programs on MS-Windows.\)" - :type 'boolean - :group 'killing) - (provide 'w32-vars) ;;; w32-vars.el ends here