Commit bf351cc2 authored by Karl Heuer's avatar Karl Heuer

(status_notify): If Vprocess_alist changes within

the loop, do the whole loop again.
parent c344d4be
......@@ -3386,6 +3386,7 @@ status_notify ()
register Lisp_Object proc, buffer;
Lisp_Object tail, msg;
struct gcpro gcpro1, gcpro2;
Lisp_Object old_process_alist;
tail = Qnil;
msg = Qnil;
......@@ -3395,6 +3396,9 @@ status_notify ()
reference. */
GCPRO2 (tail, msg);
do
{
old_process_alist = Vprocess_alist;
for (tail = Vprocess_alist; !NILP (tail); tail = Fcdr (tail))
{
Lisp_Object symbol;
......@@ -3476,6 +3480,7 @@ status_notify ()
}
}
} /* end for */
} while (! EQ (old_process_alist, Vprocess_alist));
update_mode_lines++; /* in case buffers use %s in mode-line-format */
redisplay_preserve_echo_area ();
......
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