Mercurial > emacs

comparison src/coding.c @ 23136:7a72a7b8718c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(code_convert_region1): Remove all text properties of the region.
author Kenichi Handa <handa@m17n.org>
date Fri, 28 Aug 1998 12:33:52 +0000
parents 6736da064f4a
children b2770410c752
comparison
equal deleted inserted replaced
23135:99ab9c46504a 23136:7a72a7b8718c
4731 return make_number (to - from); 4731 return make_number (to - from);
4732 4732
4733 if (setup_coding_system (Fcheck_coding_system (coding_system), &coding) < 0) 4733 if (setup_coding_system (Fcheck_coding_system (coding_system), &coding) < 0)
4734 error ("Invalid coding system: %s", XSYMBOL (coding_system)->name->data); 4734 error ("Invalid coding system: %s", XSYMBOL (coding_system)->name->data);
4735 4735
4736 /* The code conversion routine can not preserve text properties for
4737 now. So, we must remove all text properties in the region. */
4738 Fset_text_properties (start, end, Qnil, Qnil);
4739
4736 coding.mode |= CODING_MODE_LAST_BLOCK; 4740 coding.mode |= CODING_MODE_LAST_BLOCK;
4737 code_convert_region (from, CHAR_TO_BYTE (from), to, CHAR_TO_BYTE (to), 4741 code_convert_region (from, CHAR_TO_BYTE (from), to, CHAR_TO_BYTE (to),
4738 &coding, encodep, 1); 4742 &coding, encodep, 1);
4739 Vlast_coding_system_used = coding.symbol; 4743 Vlast_coding_system_used = coding.symbol;
4740 return make_number (coding.produced_char); 4744 return make_number (coding.produced_char);