mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-10 05:30:45 -08:00
Code Issues Projects Releases Wiki Activity

(concat): Fix previous change.

Browse source
This commit is contained in:
Kenichi Handa 1998-07-30 01:35:40 +00:00
parent 258e329529
commit 6bdd75a54d
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/fns.c
View file

@ -668,7 +668,7 @@ concat (nargs, args, target_type, last_special)
if (some_multibyte
&& toindex_byte > 0
&& !ASCII_BYTE_P (XSTRING (val)->data[toindex_byte - 1])
&& !CHAR_HEAD_P (XSTRING (this)->data[0] >= 0xA0))
&& !CHAR_HEAD_P (XSTRING (this)->data[0]))
maybe_combine_byte = 1;
toindex_byte += thislen_byte;
toindex += thisleni;