Mercurial > emacs
comparison src/fns.c @ 20880:4f6eebb11fc0
(concat): Use Vnonascii_translate_table.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Tue, 10 Feb 1998 04:05:47 +0000 |
parents | ad9e06c97d95 |
children | fd35cf0efd94 |
comparison
equal
deleted
inserted
replaced
20879:64d2baa47498 | 20880:4f6eebb11fc0 |
---|---|
584 XSETFASTINT (elt, XSTRING (this)->data[thisindex++]); | 584 XSETFASTINT (elt, XSTRING (this)->data[thisindex++]); |
585 if (some_multibyte && XINT (elt) >= 0200 | 585 if (some_multibyte && XINT (elt) >= 0200 |
586 && XINT (elt) < 0400) | 586 && XINT (elt) < 0400) |
587 { | 587 { |
588 c = XINT (elt); | 588 c = XINT (elt); |
589 if (nonascii_insert_offset > 0) | 589 |
590 if (! NILP (Vnonascii_translate_table)) | |
591 c = XINT (Faref (Vnonascii_translate_table, | |
592 make_number (c))); | |
593 else if (nonascii_insert_offset > 0) | |
590 c += nonascii_insert_offset; | 594 c += nonascii_insert_offset; |
591 else | 595 else |
592 c += DEFAULT_NONASCII_INSERT_OFFSET; | 596 c += DEFAULT_NONASCII_INSERT_OFFSET; |
593 | 597 |
594 XSETINT (elt, c); | 598 XSETINT (elt, c); |