From: Kenichi Handa <handa@m17n.org>
Date: Mon, 19 May 1997 03:33:50 +0000 (+0000)
Subject: (lisp_data_to_selection_data): charsets from `char' to `int.
X-Git-Tag: emacs-20.1~2067
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fb5e77f716b235979709d7babccb94f458b04a84;p=emacs.git

(lisp_data_to_selection_data): charsets from `char' to `int.
---

diff --git a/src/xselect.c b/src/xselect.c
index cf2fe19a4ae..20a977b8fa5 100644
--- a/src/xselect.c
+++ b/src/xselect.c
@@ -1596,13 +1596,13 @@ lisp_data_to_selection_data (display, obj,
     {
       /* Since we are now handling multilingual text, we must consider
 	 sending back compound text.  */
-      char charsets[MAX_CHARSET + 1];
+      int charsets[MAX_CHARSET + 1];
       int num;
 
       *format_ret = 8;
       *size_ret = XSTRING (obj)->size;
       *data_ret = XSTRING (obj)->data;
-      bzero (charsets, MAX_CHARSET + 1);
+      bzero (charsets, (MAX_CHARSET + 1) * sizeof (int));
       num = ((*size_ret <= 1)	/* Check the possibility of short cut.  */
 	     ? 0
 	     : find_charset_in_str (*data_ret, *size_ret, charsets, Qnil));