Mercurial > emacs
changeset 15440:87c6c9287f45
(Fcall_process): Handle t or nil as STDERR_FILE.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 16 Jun 1996 23:09:17 +0000 |
parents | b549210f6989 |
children | 4b82998394ae |
files | src/callproc.c |
diffstat | 1 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/callproc.c Sun Jun 16 18:47:08 1996 +0000 +++ b/src/callproc.c Sun Jun 16 23:09:17 1996 +0000 @@ -245,8 +245,16 @@ if (CONSP (buffer)) { if (CONSP (XCONS (buffer)->cdr)) - error_file = Fexpand_file_name (XCONS (XCONS (buffer)->cdr)->car, - Qnil); + { + Lisp_Object file_for_stderr; + stderr_file = XCONS (XCONS (buffer)->cdr)->car; + + if (NILP (stderr_file) || EQ (Qt, stderr_file)) + error_file = stderr_file; + else + error_file = Fexpand_file_name (stderr_file, Qnil); + } + buffer = XCONS (buffer)->car; }