mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(feedmail-queue-send-edit-prompt-help):

Browse source 
Call get-buffer-window first second arg `visible'.
This commit is contained in:
Gerd Moellmann 2001-09-27 10:54:55 +00:00
parent 14531065ac
commit 6eb94ddb0f
2 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mail/feedmail.el
View file

@ -1770,7 +1770,7 @@ you can set feedmail-queue-reminder-alist to nil."
(defun feedmail-queue-send-edit-prompt-help (d-string)
(let ((fqm-help (get-buffer feedmail-p-h-b-n)))
(if (and fqm-help (get-buffer-window fqm-help))
(if (and fqm-help (get-buffer-window fqm-help 'visible))
(feedmail-queue-send-edit-prompt-help-later fqm-help d-string)
(feedmail-queue-send-edit-prompt-help-first d-string))))