X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/0c3f76c6335de0a2d44db37c9ddf953654ca7f32..62d787ed124726fd1f73dcfb7227d83bc5940fcc:/src/w32select.c diff --git a/src/w32select.c b/src/w32select.c index b1419e52ac..3962ac6cbe 100644 --- a/src/w32select.c +++ b/src/w32select.c @@ -1,6 +1,6 @@ /* Selection processing for Emacs on the Microsoft Windows API. -Copyright (C) 1993-1994, 2001-2014 Free Software Foundation, Inc. +Copyright (C) 1993-1994, 2001-2015 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -76,11 +76,9 @@ along with GNU Emacs. If not, see . */ #include "lisp.h" #include "w32common.h" /* os_subtype */ #include "w32term.h" /* for all of the w32 includes */ -#include "keyboard.h" +#include "keyboard.h" /* for waiting_for_input */ #include "blockinput.h" -#include "charset.h" #include "coding.h" -#include "composite.h" #ifdef CYGWIN #include @@ -107,17 +105,11 @@ static Lisp_Object validate_coding_system (Lisp_Object coding_system); static void setup_windows_coding_system (Lisp_Object coding_system, struct coding_system * coding); - -/* A remnant from X11: Symbol for the CLIPBORD selection type. Other - selections are not used on Windows, so we don't need symbols for - PRIMARY and SECONDARY. */ -Lisp_Object QCLIPBOARD; - /* Internal pseudo-constants, initialized in globals_of_w32select() based on current system parameters. */ static LCID DEFAULT_LCID; static UINT ANSICP, OEMCP; -static Lisp_Object QUNICODE, QANSICP, QOEMCP; +static Lisp_Object QANSICP, QOEMCP; /* A hidden window just for the clipboard management. */ static HWND clipboard_owner; @@ -519,7 +511,7 @@ setup_config (void) cfg_clipboard_type = CF_TEXT; /* Interpret the coding system symbol name */ - coding_name = SDATA (SYMBOL_NAME (cfg_coding_system)); + coding_name = SSDATA (SYMBOL_NAME (cfg_coding_system)); /* "(.*-)?utf-16.*" -> CF_UNICODETEXT */ cp = strstr (coding_name, "utf-16"); @@ -863,7 +855,7 @@ DEFUN ("w32-get-clipboard-data", Fw32_get_clipboard_data, { int i; - nbytes = strlen (src); + nbytes = strlen ((char *)src); for (i = 0; i < nbytes; i++) {