(concat): If Vnonascii_translation_table is non-nil, try

to convert a character less than 160 to multibyte.

1 files changed, 3 insertions, 1 deletions

diff --git a/src/fns.c b/src/fns.c
index a4a3fb882a..f0a387ecd2 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -709,7 +709,9 @@ concat (nargs, args, target_type, last_special)
 		else
 		  {
 		    XSETFASTINT (elt, XSTRING (this)->data[thisindex++]);
-		    if (some_multibyte && XINT (elt) >= 0200
+		    if (some_multibyte
+			&& (XINT (elt) >= 0240
+			    || ! NILP (Vnonascii_translation_table))
 			&& XINT (elt) < 0400)
 		      {
 			c = unibyte_char_to_multibyte (XINT (elt));