X-Git-Url: https://git.hcoop.net/bpt/emacs.git/blobdiff_plain/2699a55464f7b43171c7b0e64d095640904e9e21..bbcd0949d9cd085b6838c03f3d89171f967372fa:/src/w32select.c diff --git a/src/w32select.c b/src/w32select.c index 18694d2d33..23d5fb68c7 100644 --- a/src/w32select.c +++ b/src/w32select.c @@ -1,7 +1,6 @@ /* Selection processing for Emacs on the Microsoft W32 API. -Copyright (C) 1993, 1994, 2001, 2002, 2003, 2004, 2005, 2006, 2007, - 2008, 2009, 2010 Free Software Foundation, Inc. +Copyright (C) 1993-1994, 2001-2011 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -111,13 +110,6 @@ static void setup_windows_coding_system (Lisp_Object coding_system, PRIMARY and SECONDARY. */ Lisp_Object QCLIPBOARD; -/* Coding system for communicating with other programs via the - clipboard. */ -static Lisp_Object Vselection_coding_system; - -/* Coding system for the next communication with other programs. */ -static Lisp_Object Vnext_selection_coding_system; - /* Internal pseudo-constants, initialized in globals_of_w32select() based on current system parameters. */ static LCID DEFAULT_LCID; @@ -1068,7 +1060,7 @@ syms_of_w32select (void) defsubr (&Sw32_get_clipboard_data); defsubr (&Sx_selection_exists_p); - DEFVAR_LISP ("selection-coding-system", &Vselection_coding_system, + DEFVAR_LISP ("selection-coding-system", Vselection_coding_system, doc: /* Coding system for communicating with other programs. For MS-Windows and MS-DOS: @@ -1102,7 +1094,7 @@ The default value is nil. */); below. */ Vselection_coding_system = Qnil; - DEFVAR_LISP ("next-selection-coding-system", &Vnext_selection_coding_system, + DEFVAR_LISP ("next-selection-coding-system", Vnext_selection_coding_system, doc: /* Coding system for the next communication with other programs. Usually, `selection-coding-system' is used for communicating with other programs (X Windows clients or MS Windows programs). But, if this