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

(concat): Use Vnonascii_translate_table.

Browse source
This commit is contained in:
Kenichi Handa 1998-02-10 04:05:47 +00:00
parent 80e01f8d51
commit bca7646d48
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/fns.c
View file

@ -586,7 +586,11 @@ concat (nargs, args, target_type, last_special)
&& XINT (elt) < 0400)
{
c = XINT (elt);
if (nonascii_insert_offset > 0)
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;