Mercurial > emacs
comparison src/coding.c @ 34593:f727eb496b4e
(detect_coding): Call detect_coding_mask with a correct MULTIBYTEP
argument.
(code_convert_region): Don't override coding->src_multibyte and
coding->dst_multibyte.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 15 Dec 2000 08:30:40 +0000 |
| parents | 9d5d795f9315 |
| children | e112f39ea5b6 |
comparison
equal
deleted
inserted
replaced
| 34592:726f3f38d889 | 34593:f727eb496b4e |
|---|---|
| 3688 unsigned int idx; | 3688 unsigned int idx; |
| 3689 int skip, mask, i; | 3689 int skip, mask, i; |
| 3690 Lisp_Object val; | 3690 Lisp_Object val; |
| 3691 | 3691 |
| 3692 val = Vcoding_category_list; | 3692 val = Vcoding_category_list; |
| 3693 mask = detect_coding_mask (src, src_bytes, coding_priorities, &skip, 0); | 3693 mask = detect_coding_mask (src, src_bytes, coding_priorities, &skip, |
| 3694 coding->src_multibyte); | |
| 3694 coding->heading_ascii = skip; | 3695 coding->heading_ascii = skip; |
| 3695 | 3696 |
| 3696 if (!mask) return; | 3697 if (!mask) return; |
| 3697 | 3698 |
| 3698 /* We found a single coding system of the highest priority in MASK. */ | 3699 /* We found a single coding system of the highest priority in MASK. */ |
| 4830 Lisp_Object deletion; | 4831 Lisp_Object deletion; |
| 4831 int orig_point = PT, orig_len = len; | 4832 int orig_point = PT, orig_len = len; |
| 4832 int prev_Z; | 4833 int prev_Z; |
| 4833 int multibyte_p = !NILP (current_buffer->enable_multibyte_characters); | 4834 int multibyte_p = !NILP (current_buffer->enable_multibyte_characters); |
| 4834 | 4835 |
| 4835 coding->src_multibyte = replace && multibyte_p; | |
| 4836 coding->dst_multibyte = multibyte_p; | |
| 4837 | |
| 4838 deletion = Qnil; | 4836 deletion = Qnil; |
| 4839 saved_coding_symbol = Qnil; | 4837 saved_coding_symbol = Qnil; |
| 4840 | 4838 |
| 4841 if (from < PT && PT < to) | 4839 if (from < PT && PT < to) |
| 4842 { | 4840 { |
