mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-04 02:51:31 -08:00
(Fcall_process): Be sure to give the current buffer
to decode_coding_c_string. Update PT and PT_BYTE after the insertion.
This commit is contained in:
parent
31285a8f59
commit
ea99bcc1c7
1 changed files with 6 additions and 1 deletions
|
|
@ -770,8 +770,11 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */)
|
|||
insert_1_both (bufptr, nread, nread, 0, 1, 0);
|
||||
else
|
||||
{ /* We have to decode the input. */
|
||||
Lisp_Object buf;
|
||||
|
||||
XSETBUFFER (buf, current_buffer);
|
||||
decode_coding_c_string (&process_coding, bufptr, nread,
|
||||
buffer);
|
||||
buf);
|
||||
if (display_on_the_fly
|
||||
&& CODING_REQUIRE_DETECTION (&saved_coding)
|
||||
&& ! CODING_REQUIRE_DETECTION (&process_coding))
|
||||
|
|
@ -793,6 +796,8 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */)
|
|||
continue;
|
||||
}
|
||||
|
||||
TEMP_SET_PT_BOTH (PT + process_coding.produced_char,
|
||||
PT_BYTE + process_coding.produced);
|
||||
nread -= process_coding.consumed;
|
||||
carryover = nread;
|
||||
if (carryover > 0)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue