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

[Klaus Berndl]

Hi,

i think the subject says all, doesn't it?

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?

Thanks for hints in advance!
Klaus

-- 
Klaus Berndl                    mailto: klaus.berndl@sdm.de
sd&m AG                         http://www.sdm.de
software design & management    
Carl-Wery-Str. 42, 81739 Muenchen, Germany
Tel +49 89 63812-392, Fax -220