diff options
| author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-01-13 15:15:03 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-01-13 15:15:03 +0000 |
| commit | 8111ec056543164117099bd6fdecb51f39428fb4 (patch) | |
| tree | 3b560071e46c00d2d03706cf5ed8972527ca7b88 | |
| parent | cb8e5d4e6e76be7266b424e0cb347442445ab14a (diff) | |
| download | emacs-8111ec056543164117099bd6fdecb51f39428fb4.tar.gz | |
(Fcall_process): Fix previous change.
| -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 */ |