Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
6bdd75a5
Commit
6bdd75a5
authored
Jul 30, 1998
by
Kenichi Handa
Browse files
(concat): Fix previous change.
parent
258e3295
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
1 addition
and
1 deletion
+1
-1
src/fns.c
src/fns.c
+1
-1
No files found.
src/fns.c
View file @
6bdd75a5
...
@@ -668,7 +668,7 @@ concat (nargs, args, target_type, last_special)
...
@@ -668,7 +668,7 @@ concat (nargs, args, target_type, last_special)
if (some_multibyte
if (some_multibyte
&& toindex_byte > 0
&& toindex_byte > 0
&& !ASCII_BYTE_P (XSTRING (val)->data[toindex_byte - 1])
&& !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;
maybe_combine_byte = 1;
toindex_byte += thislen_byte;
toindex_byte += thislen_byte;
toindex += thisleni;
toindex += thisleni;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment