From 44893c8f3a0286aa06f0c4f7a5e9036da60d1683 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 18 May 1998 00:59:38 +0000 Subject: [PATCH] (concat): Fix bug in concatinating a list of multibyte and unibyte characters. --- src/fns.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/fns.c b/src/fns.c index 404f9976544..51eec4d472c 100644 --- a/src/fns.c +++ b/src/fns.c @@ -731,8 +731,8 @@ concat (nargs, args, target_type, last_special) 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, -- 2.39.2