(Fcall_process): Handle t or nil as STDERR_FILE.
This commit is contained in:
parent
2c9d345f8b
commit
45be8a1e58
1 changed files with 10 additions and 2 deletions
|
@ -245,8 +245,16 @@ If you quit, the process is killed with SIGINT, or SIGKILL if you quit again.")
|
|||
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;
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue