Re: How to check if Emacs currently waits for output of a running process in a visible buffer?

[Kevin Rodgers]

Klaus Berndl wrote:
> Currently i have something like
>
> (delq nil (mapcar (function (lambda (p)
>                               (and (process-buffer p)
>                                    (get-buffer-window (process-buffer p)))))
>                   (process-list)))
>
> If this returns not nil then there is currently at least one process-buffer
> visible - so far so good, but unfortunatelly this form also returns not nil if
> a *shell* buffer is visible, but here Emacs does not really wait for input. Is
> this understandable, makes this clear what I'm searching for?

You need to tell get-buffer-window to search all visible frames:

(delq nil
      (mapcar (lambda (process)
                (let ((buffer (process-buffer process)))
                  (and buffer (get-buffer-window buffer 'visible))))
              (process-list)))

--
Kevin Rodgers