# HG changeset patch # User Kenichi Handa # Date 1195376714 0 # Node ID 63ffdb0bbe19daccac946944cfa0b8980ac26d30 # Parent eb12ed8fee16515bdf5b06ea8ff66577358e4b53 (Vselection_coding_system) (Vnext_selection_coding_system): Delete them. (syms_of_xselect): Don't declare selection-coding-system and next-selection-coding-system. They are declared in select.el. diff -r eb12ed8fee16 -r 63ffdb0bbe19 src/xselect.c --- a/src/xselect.c Sat Nov 17 11:06:58 2007 +0000 +++ b/src/xselect.c Sun Nov 18 09:05:14 2007 +0000 @@ -123,13 +123,6 @@ static Lisp_Object Vx_lost_selection_functions; static Lisp_Object Vx_sent_selection_functions; -/* Coding system for communicating with other X clients via selection - and clipboard. */ -static Lisp_Object Vselection_coding_system; - -/* Coding system for the next communicating with other X clients. */ -static Lisp_Object Vnext_selection_coding_system; - static Lisp_Object Qforeign_selection; /* If this is a smaller number than the max-request-size of the display, @@ -3006,30 +2999,6 @@ it merely informs you that they have happened. */); Vx_sent_selection_functions = Qnil; - DEFVAR_LISP ("selection-coding-system", &Vselection_coding_system, - doc: /* Coding system for communicating with other X clients. - -When sending text via selection and clipboard, if the requested -data-type is not "UTF8_STRING", the text is encoded by this coding -system. - -When receiving text, if the data-type of the received text is not -"UTF8_STRING", it is decoded by this coding system. - -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 `compound-text-with-extensions'. */); - Vselection_coding_system = intern ("compound-text-with-extensions"); - - DEFVAR_LISP ("next-selection-coding-system", &Vnext_selection_coding_system, - doc: /* Coding system for the next communication with other X clients. -Usually, `selection-coding-system' is used for communicating with -other X clients. But, if this variable is set, it is used for the -next communication only. After the communication, this variable is -set to nil. */); - Vnext_selection_coding_system = Qnil; - DEFVAR_INT ("x-selection-timeout", &x_selection_timeout, doc: /* Number of milliseconds to wait for a selection reply. If the selection owner doesn't reply in this time, we give up.