aboutsummaryrefslogtreecommitdiffstats
path: root/src/fns.c
diff options
context:
space:
mode:
authorKenichi Handa <[email protected]>1998-03-03 01:29:16 +0000
committerKenichi Handa <[email protected]>1998-03-03 01:29:16 +0000
commit2cef5737de1aa5a1c3c66c59a22fb32fba6c391a (patch)
tree1d830526381276cb609e624f5df53e15455a8392 /src/fns.c
parent93fdf93bc151e6679ec0d000ad040ec1daf70c61 (diff)
(DEFAULT_NONASCII_INSERT_OFFSET): Macro definition is
moved to charset.h. (concat): Use unibyte_char_to_multibyte.
Diffstat (limited to 'src/fns.c')
-rw-r--r--src/fns.c18
1 files changed, 3 insertions, 15 deletions
diff --git a/src/fns.c b/src/fns.c
index 6bdcff83e2..1299f3d2a8 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -40,8 +40,6 @@ Boston, MA 02111-1307, USA. */
#define NULL (void *)0
#endif
-#define DEFAULT_NONASCII_INSERT_OFFSET 0x800
-
/* Nonzero enables use of dialog boxes for questions
asked by mouse commands. */
int use_dialog_box;
@@ -573,9 +571,9 @@ concat (nargs, args, target_type, last_special)
break;
else if (STRINGP (this))
{
+ int c;
if (STRING_MULTIBYTE (this))
{
- int c;
FETCH_STRING_CHAR_ADVANCE (c, this,
thisindex,
thisindex_byte);
@@ -583,21 +581,11 @@ concat (nargs, args, target_type, last_special)
}
else
{
- unsigned char c;
XSETFASTINT (elt, XSTRING (this)->data[thisindex++]);
if (some_multibyte && XINT (elt) >= 0200
&& XINT (elt) < 0400)
{
- c = XINT (elt);
-
- if (! NILP (Vnonascii_translate_table))
- c = XINT (Faref (Vnonascii_translate_table,
- make_number (c)));
- else if (nonascii_insert_offset > 0)
- c += nonascii_insert_offset;
- else
- c += DEFAULT_NONASCII_INSERT_OFFSET;
-
+ c = unibyte_char_to_multibyte (XINT (elt));
XSETINT (elt, c);
}
}
@@ -793,7 +781,7 @@ string_byte_to_char (string, byte_index)
}
/* Convert STRING to a multibyte string.
- Single-byte characters 0200 through 0377 are converted
+ Single-byte characters 0240 through 0377 are converted
by adding nonascii_insert_offset to each. */
Lisp_Object