diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/callproc.c | 6 |
2 files changed, 10 insertions, 0 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 0ad3ba97e0f..a6caa49221b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,9 @@ 2008-01-13 Dan Nicolaescu <dann@ics.uci.edu> + * callproc.c: (Fcall_process): Fix previous change. + +2008-01-13 Dan Nicolaescu <dann@ics.uci.edu> + * (unexsunos4): Remove file, system not supported anymore. * (src/m/mips.h): diff --git a/src/callproc.c b/src/callproc.c index 2078c4411fd..3a725b80a0a 100644 --- a/src/callproc.c +++ b/src/callproc.c @@ -471,6 +471,12 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */) else { #ifndef MSDOS + errno = 0; + if (pipe (fd) == -1) + { + emacs_close (filefd); + report_file_error ("Creating process pipe", Qnil); + } #endif #if 0 /* Replaced by close_process_descs */ |