From: Kenichi Handa <handa@m17n.org>
Date: Wed, 12 Jun 2002 00:57:16 +0000 (+0000)
Subject: (Ffind_charset_string): Setup the vector `charsets' correctly.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~649
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dcd50550895047d3e60305ac4cc1c29447346ae4;p=emacs.git

(Ffind_charset_string): Setup the vector `charsets' correctly.
---

diff --git a/src/charset.c b/src/charset.c
index 2425e18c58e..0ef023a3df2 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -1366,6 +1366,8 @@ only `ascii', `eight-bit-control', and `eight-bit-graphic'. */)
   CHECK_STRING (str);
 
   charsets = Fmake_vector (make_number (charset_table_used), Qnil);
+  for (i = 0; i < charset_table_used; i++)
+    ASET (charsets, i, Fcons (make_number (i), Qnil));
   find_charsets_in_text (XSTRING (str)->data, XSTRING (str)->size,
 			 STRING_BYTES (XSTRING (str)), charsets, table);