From: Ian Kelling <ian@iankelling.org>
Date: Sun, 5 Jul 2015 22:14:12 +0000 (-0700)
Subject: accept-process-output fix
X-Git-Tag: emacs-25.0.90~1562
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cbeeab2eab5d53f0fba452d4790d7a58071605e2;p=emacs.git

accept-process-output fix

This is a followon to the fix for Bug#17647 (Bug#20976).
* src/process.c (status_notify): Fix too high return in some cases.
---

diff --git a/src/process.c b/src/process.c
index 3132f19d636..70c9076d4e8 100644
--- a/src/process.c
+++ b/src/process.c
@@ -6714,7 +6714,8 @@ status_notify (struct Lisp_Process *deleting_process,
 		 && p != deleting_process)
 	    {
 	      int nread = read_process_output (proc, p->infd);
-	      if (got_some_input < nread)
+	      if ((!wait_proc || wait_proc == XPROCESS (proc))
+		  && got_some_input < nread)
 		got_some_input = nread;
 	      if (nread <= 0)
 		break;