> How can I get the currently visible buffers?

(cl-delete-if (lambda (buf)
                (not (get-buffer-window buf 'visible)))
		    (buffer-list))