diff options
author | Kenichi Handa <handa@m17n.org> | 2003-06-05 12:31:46 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 2003-06-05 12:31:46 +0000 |
commit | 54ab3d3bb06d0102b9c17da9db464607399d220f (patch) | |
tree | 181c1c43f6c920cd19ab44cbac5042cd3413d5b3 /src/callproc.c | |
parent | dd8c7a534e3de21370a7741e81c100b0cd743b71 (diff) | |
download | emacs-54ab3d3bb06d0102b9c17da9db464607399d220f.tar.gz emacs-54ab3d3bb06d0102b9c17da9db464607399d220f.tar.bz2 emacs-54ab3d3bb06d0102b9c17da9db464607399d220f.zip |
(Fcall_process): Handle carryover correctly.
Diffstat (limited to 'src/callproc.c')
-rw-r--r-- | src/callproc.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/callproc.c b/src/callproc.c index da3654a3411..8c6df89ea7e 100644 --- a/src/callproc.c +++ b/src/callproc.c @@ -797,13 +797,12 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */) TEMP_SET_PT_BOTH (PT + process_coding.produced_char, PT_BYTE + process_coding.produced); - nread -= process_coding.consumed; - carryover = nread; + carryover = process_coding.carryover_bytes; if (carryover > 0) /* As CARRYOVER should not be that large, we had better avoid overhead of bcopy. */ - BCOPY_SHORT (bufptr + process_coding.consumed, bufptr, - carryover); + BCOPY_SHORT (process_coding.carryover, bufptr, + process_coding.carryover_bytes); } } |