diff options
| author | Kenichi Handa <handa@m17n.org> | 1998-02-10 04:05:47 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1998-02-10 04:05:47 +0000 |
| commit | 2b37a17c6ca35fb049e90caa2594559e0a5b7b3c (patch) | |
| tree | 81c117ed3cb7f18a306f44175eea3e400d0d6eeb | |
| parent | e70e651a32a67bbc85e25b300fd04219256e9a37 (diff) | |
| download | emacs-2b37a17c6ca35fb049e90caa2594559e0a5b7b3c.tar.gz | |
(concat): Use Vnonascii_translate_table.
| -rw-r--r-- | src/fns.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/fns.c b/src/fns.c index bc14b280002..b0b8e218aae 100644 --- a/src/fns.c +++ b/src/fns.c @@ -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; |