Mercurial > emacs
changeset 91674:31216f583b8a
(selection-coding-system): Make it a defcustom, and add the properties
from cus-start.el. Bump :version.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Fri, 08 Feb 2008 20:16:35 +0000 |
| parents | 9bf7ff5c46e6 |
| children | 9512ece34184 |
| files | lisp/select.el |
| diffstat | 1 files changed, 9 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/select.el Fri Feb 08 20:12:26 2008 +0000 +++ b/lisp/select.el Fri Feb 08 20:16:35 2008 +0000 @@ -28,7 +28,7 @@ ;;; Code: -(defvar selection-coding-system nil +(defcustom selection-coding-system nil "Coding system for communicating with other X clients. When sending text via selection and clipboard, if the target @@ -50,7 +50,14 @@ See also the documentation of the variable `x-select-request-type' how to control which data-type to request for receiving text. -The default value is nil.") +The default value is nil." + :type 'coding-system + :group 'mule + ;; Default was compound-text-with-extensions in 22.x (pre-unicode). + :version "23.1" + :set (lambda (symbol value) + (set-selection-coding-system value) + (set symbol value))) (defvar next-selection-coding-system nil "Coding system for the next communication with other X clients.