# HG changeset patch # User Richard M. Stallman # Date 902356322 0 # Node ID 4d4e775cf6f725353b96705027c7ee52c7988865 # Parent edbc56db94eedc57b7528b1d7ecf3a7aacc86c02 (Vselection_coding_system): Renamed from Vclipboard_coding_system. (syms_of_w32select): No need to staticpro Vselection_coding_system. diff -r edbc56db94ee -r 4d4e775cf6f7 src/w32select.c --- a/src/w32select.c Wed Aug 05 20:41:55 1998 +0000 +++ b/src/w32select.c Wed Aug 05 22:32:02 1998 +0000 @@ -34,7 +34,7 @@ /* Coding system for communicating with other Windows programs via the clipboard. */ -static Lisp_Object Vclipboard_coding_system; +static Lisp_Object Vselection_coding_system; #if 0 DEFUN ("w32-open-clipboard", Fw32_open_clipboard, Sw32_open_clipboard, 0, 1, 0, @@ -182,7 +182,7 @@ HANDLE htext2; setup_coding_system - (Fcheck_coding_system (Vclipboard_coding_system), &coding); + (Fcheck_coding_system (Vselection_coding_system), &coding); coding.mode |= CODING_MODE_LAST_BLOCK; bufsize = encoding_buffer_size (&coding, nbytes); if ((htext = GlobalAlloc (GMEM_MOVEABLE | GMEM_DDESHARE, bufsize)) == NULL) @@ -255,7 +255,7 @@ struct coding_system coding; setup_coding_system - (Fcheck_coding_system(Vclipboard_coding_system), &coding); + (Fcheck_coding_system(Vselection_coding_system), &coding); coding.mode |= CODING_MODE_LAST_BLOCK; bufsize = decoding_buffer_size (&coding, nbytes); buf = (unsigned char *) xmalloc (bufsize); @@ -371,13 +371,12 @@ defsubr (&Sw32_get_clipboard_data); defsubr (&Sx_selection_exists_p); - DEFVAR_LISP ("clipboard-coding-system", &Vclipboard_coding_system, + DEFVAR_LISP ("selection-coding-system", &Vselection_coding_system, "Coding system for communicating with other X clients.\n\ When sending or receiving text via cut_buffer, selection, and clipboard,\n\ the text is encoded or decoded by this coding system.\n\ A default value is `compound-text'"); - Vclipboard_coding_system=intern ("iso-latin-1-dos"); - staticpro(&Vclipboard_coding_system); + Vselection_coding_system=intern ("iso-latin-1-dos"); QCLIPBOARD = intern ("CLIPBOARD"); staticpro (&QCLIPBOARD); }