From: Kenichi Handa <handa@m17n.org>
Date: Tue, 15 Oct 2002 01:17:51 +0000 (+0000)
Subject: (Faset): Check NEWELT by ASCII_CHAR_P, not by
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~245
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=93ba97b977f0b5e35c26fe81d0f1b070e773986e;p=emacs.git

(Faset): Check NEWELT by ASCII_CHAR_P, not by
SINGLE_BYTE_CHAR_P.
---

diff --git a/src/data.c b/src/data.c
index c35efe3067e..2d7ca8e2037 100644
--- a/src/data.c
+++ b/src/data.c
@@ -1955,7 +1955,7 @@ IDX starts at 0.  */)
 	args_out_of_range (array, idx);
       CHECK_NUMBER (newelt);
 
-      if (XINT (newelt) < 0 || SINGLE_BYTE_CHAR_P (XINT (newelt)))
+      if (XINT (newelt) < 0 || ASCII_CHAR_P (XINT (newelt)))
 	XSTRING (array)->data[idxval] = XINT (newelt);
       else
 	{