HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2dd60df
)
(Fprocess_status): Return nil for process name that has no process.
author
Richard M. Stallman
<rms@gnu.org>
Fri, 17 Jun 1994 13:40:33 +0000
(13:40 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Fri, 17 Jun 1994 13:40:33 +0000
(13:40 +0000)
src/process.c
patch
|
blob
|
blame
|
history
diff --git
a/src/process.c
b/src/process.c
index
e2f7f6a
..
66e21c1
100644
(file)
--- a/
src/process.c
+++ b/
src/process.c
@@
-626,9
+626,15
@@
nil, indicating the current buffer's process.")
{
register struct Lisp_Process *p;
register Lisp_Object status;
- proc = get_process (proc);
+
+ if (STRINGP (proc))
+ proc = Fget_process (proc);
+ else
+ proc = get_process (proc);
+
if (NILP (proc))
return proc;
+
p = XPROCESS (proc);
if (!NILP (p->raw_status_low))
update_status (p);