comparison src/callproc.c @ 15440:87c6c9287f45

(Fcall_process): Handle t or nil as STDERR_FILE.

15439:b549210f6989

      /* If BUFFER is a list, its meaning is
	 (BUFFER-FOR-STDOUT FILE-FOR-STDERR).  */
      if (CONSP (buffer))
	{
	  if (CONSP (XCONS (buffer)->cdr))
	    error_file = Fexpand_file_name (XCONS (XCONS (buffer)->cdr)->car,
					    Qnil);
	  buffer = XCONS (buffer)->car;
	}

      if (!(EQ (buffer, Qnil)
	    || EQ (buffer, Qt)

15440:87c6c9287f45

      /* If BUFFER is a list, its meaning is
	 (BUFFER-FOR-STDOUT FILE-FOR-STDERR).  */
      if (CONSP (buffer))
	{
	  if (CONSP (XCONS (buffer)->cdr))
	    {
	      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;
	}

      if (!(EQ (buffer, Qnil)
	    || EQ (buffer, Qt)