changeset 22117:c6b783988569

(concat): Fix bug in concatinating a list of multibyte and unibyte characters.
author Kenichi Handa <handa@m17n.org>
date Mon, 18 May 1998 00:59:38 +0000
parents 09efd6a94b4b
children 42e2ffa98618
files src/fns.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Mon May 18 00:59:38 1998 +0000
+++ b/src/fns.c	Mon May 18 00:59:38 1998 +0000
@@ -731,8 +731,8 @@
 		CHECK_NUMBER (elt, 0);
 		if (SINGLE_BYTE_CHAR_P (XINT (elt)))
 		  {
-		    XSTRING (val)->data[toindex++] = XINT (elt);
-		    toindex_byte++;
+		    XSTRING (val)->data[toindex_byte++] = XINT (elt);
+		    toindex++;
 		  }
 		else
 		  /* If we have any multibyte characters,