Use eldoc-documentation-functions

[gnu-emacs] / src / w32select.c

diff --git a/src/w32select.c b/src/w32select.c
index 138fe853c4d9510c349f6d89435459188902a25f..a38a42ca05097b80b9e66d3b8433596d75ee1e78 100644 (file)
--- a/src/w32select.c
+++ b/src/w32select.c
@@ -76,6 +76,7 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #include "lisp.h"
 #include "w32common.h" /* os_subtype */
 #include "w32term.h"   /* for all of the w32 includes */
+#include "w32select.h"
 #include "keyboard.h"  /* for waiting_for_input */
 #include "blockinput.h"
 #include "coding.h"
@@ -256,7 +257,7 @@ render (Lisp_Object oformat)
        switch (format)
          {
          case CF_UNICODETEXT:
-           htext = convert_to_handle_as_coded (QUNICODE);
+           htext = convert_to_handle_as_coded (Qutf_16le_dos);
            break;
          case CF_TEXT:
          case CF_OEMTEXT:
@@ -1109,7 +1110,7 @@ After the communication, this variable is set to nil.  */);
   current_text = Qnil;         staticpro (&current_text);
   current_coding_system = Qnil; staticpro (&current_coding_system);
 
-  DEFSYM (QUNICODE, "utf-16le-dos");
+  DEFSYM (Qutf_16le_dos, "utf-16le-dos");
   QANSICP = Qnil; staticpro (&QANSICP);
   QOEMCP = Qnil;  staticpro (&QOEMCP);
 }
@@ -1132,7 +1133,7 @@ globals_of_w32select (void)
   QOEMCP = coding_from_cp (OEMCP);
 
   if (os_subtype == OS_NT)
-    Vselection_coding_system = QUNICODE;
+    Vselection_coding_system = Qutf_16le_dos;
   else if (inhibit_window_system)
     Vselection_coding_system = QOEMCP;
   else