masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-09 21:50:50 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

(ccl_coding_driver): Always calculate correct mulibyte

Browse source 
chars in produced byte sequence.
(Ffind_operation_coding_system): Doc-string fixed.
This commit is contained in:
Kenichi Handa 1998-09-07 13:39:15 +00:00
parent a6611c0d56
commit 69f7652519
1 changed files with 6 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

19
src/coding.c
View file

@ -3612,18 +3612,11 @@ ccl_coding_driver (coding, source, destination, src_bytes, dst_bytes, encodep)
coding->produced = ccl_driver (ccl, source, destination,
src_bytes, dst_bytes, &(coding->consumed));
if (encodep)
{
coding->produced_char = coding->produced;
coding->consumed_char
= multibyte_chars_in_text (source, coding->consumed);
}
else
{
coding->produced_char
= multibyte_chars_in_text (destination, coding->produced);
coding->consumed_char = coding->consumed;
}
coding->produced_char
= multibyte_chars_in_text (destination, coding->produced);
coding->consumed_char
= multibyte_chars_in_text (source, coding->consumed);
switch (ccl->status)
{
case CCL_STAT_SUSPEND_BY_SRC:
@ -4988,7 +4981,7 @@ DEFUN ("keyboard-coding-system",
DEFUN ("find-operation-coding-system", Ffind_operation_coding_system,
Sfind_operation_coding_system, 1, MANY, 0,
"Choose a coding system for an operation based on the target name.\n\
The value names a pair of coding systems: (DECODING-SYSTEM ENCODING-SYSTEM).\n\
The value names a pair of coding systems: (DECODING-SYSTEM . ENCODING-SYSTEM).\n\
DECODING-SYSTEM is the coding system to use for decoding\n\
\(in case OPERATION does decoding), and ENCODING-SYSTEM is the coding system\n\
for encoding (in case OPERATION does encoding).\n\