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 /src/callproc.c | |
| parent | cb8e5d4e6e76be7266b424e0cb347442445ab14a (diff) | |
| download | emacs-8111ec056543164117099bd6fdecb51f39428fb4.tar.gz emacs-8111ec056543164117099bd6fdecb51f39428fb4.tar.bz2 emacs-8111ec056543164117099bd6fdecb51f39428fb4.zip | |
(Fcall_process): Fix previous change.
Diffstat (limited to 'src/callproc.c')
| -rw-r--r-- | src/callproc.c | 6 |
1 files changed, 6 insertions, 0 deletions
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 */ |