diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-09-27 10:54:55 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-09-27 10:54:55 +0000 |
| commit | 6eb94ddb0f2e64ca9cd66486ae2aa0b76fe4c2ac (patch) | |
| tree | 38bef1807802246691b440942724ef41490e4f77 /lisp/mail/feedmail.el | |
| parent | 14531065acf2747546c0b3e7511779b66afd2274 (diff) | |
| download | emacs-6eb94ddb0f2e64ca9cd66486ae2aa0b76fe4c2ac.tar.gz emacs-6eb94ddb0f2e64ca9cd66486ae2aa0b76fe4c2ac.tar.bz2 emacs-6eb94ddb0f2e64ca9cd66486ae2aa0b76fe4c2ac.zip | |
(feedmail-queue-send-edit-prompt-help):
Call get-buffer-window first second arg `visible'.
Diffstat (limited to 'lisp/mail/feedmail.el')
| -rw-r--r-- | lisp/mail/feedmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el index 2d21c9c45c5..a5679073064 100644 --- a/lisp/mail/feedmail.el +++ b/lisp/mail/feedmail.el @@ -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)))) |