Commit 23a98c7a authored by Daniel Colascione's avatar Daniel Colascione

Make process-running-child-p return foreground process group ID

* etc/NEWS: Mention change to `process-running-child-p`.

* src/process.c (Fprocess_running_child_p): Return number identifier of
the foreground process group if we know it.
parent 71fdbd77
2015-03-24 Daniel Colascione <dancol@dancol.org>
* NEWS: Mention change to `process-running-child-p`.
2015-03-23 Daiki Ueno <ueno@gnu.org>
* NEWS: Mention `make-process'.
......
......@@ -628,6 +628,9 @@ active region handling.
** `cl-the' now asserts that its argument is of the given type.
** `process-running-child-p` may now return a numeric process
group ID instead of `t'.
+++
** Mouse click events on mode line or header line no longer include
any reference to a buffer position. The 6th member of the mouse
......
2015-03-24 Daniel Colascione <dancol@dancol.org>
* process.c (Fprocess_running_child_p): Return number identifier of
the foreground process group if we know it.
2015-03-23 Paul Eggert <eggert@cs.ucla.edu>
Minor refactoring of new Fmake_process code
......
......@@ -5739,9 +5739,10 @@ emacs_get_tty_pgrp (struct Lisp_Process *p)
DEFUN ("process-running-child-p", Fprocess_running_child_p,
Sprocess_running_child_p, 0, 1, 0,
doc: /* Return t if PROCESS has given the terminal to a child.
If the operating system does not make it possible to find out,
return t unconditionally. */)
doc: /* Return non-nil if PROCESS has given the terminal to a
child. If the operating system does not make it possible to find out,
return t. If we can find out, return the numeric ID of the foreground
process group. */)
(Lisp_Object process)
{
/* Initialize in case ioctl doesn't exist or gives an error,
......@@ -5764,6 +5765,8 @@ return t unconditionally. */)
if (gid == p->pid)
return Qnil;
if (gid != -1)
return make_number (gid);
return Qt;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment