diff options
Diffstat (limited to 'src/coding.c')
| -rw-r--r-- | src/coding.c | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/coding.c b/src/coding.c index 24c6ef0b6b1..53661fc33cc 100644 --- a/src/coding.c +++ b/src/coding.c @@ -5577,6 +5577,8 @@ code_convert_region (from, from_byte, to, to_byte, coding, encodep, replace) inhibit_modification_hooks = saved_inhibit_modification_hooks; } + coding->heading_ascii = 0; + if (! encodep && CODING_REQUIRE_DETECTION (coding)) { /* We must detect encoding of text and eol format. */ @@ -6221,6 +6223,8 @@ decode_coding_string (str, coding, nocopy) saved_coding_symbol = coding->symbol; coding->src_multibyte = STRING_MULTIBYTE (str); coding->dst_multibyte = 1; + coding->heading_ascii = 0; + if (CODING_REQUIRE_DETECTION (coding)) { /* See the comments in code_convert_region. */ @@ -6433,6 +6437,7 @@ encode_coding_string (str, coding, nocopy) /* Try to skip the heading and tailing ASCIIs. We can't skip them if we must run CCL program or there are compositions to encode. */ + coding->heading_ascii = 0; if (coding->type != coding_type_ccl && (! coding->cmp_data || coding->cmp_data->used == 0)) { @@ -7270,7 +7275,7 @@ Return the corresponding character. */) } DEFUN ("encode-sjis-char", Fencode_sjis_char, Sencode_sjis_char, 1, 1, 0, - doc: /* Encode a Japanese character CHAR to shift_jis encoding. + doc: /* Encode a Japanese character CH to shift_jis encoding. Return the corresponding code in SJIS. */) (ch) Lisp_Object ch; @@ -7330,7 +7335,7 @@ Return the corresponding character. */) } DEFUN ("encode-big5-char", Fencode_big5_char, Sencode_big5_char, 1, 1, 0, - doc: /* Encode the Big5 character CHAR to BIG5 coding system. + doc: /* Encode the Big5 character CH to BIG5 coding system. Return the corresponding character code in Big5. */) (ch) Lisp_Object ch; |