From: Gerd Moellmann Date: Thu, 27 Sep 2001 10:54:55 +0000 (+0000) Subject: (feedmail-queue-send-edit-prompt-help): X-Git-Tag: emacs-21.1~138 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6eb94ddb0f2e64ca9cd66486ae2aa0b76fe4c2ac;p=emacs.git (feedmail-queue-send-edit-prompt-help): Call get-buffer-window first second arg `visible'. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cd10d7a2211..bd7c0b05aa0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2001-09-27 Gerd Moellmann + * mail/feedmail.el (feedmail-queue-send-edit-prompt-help): + Call get-buffer-window first second arg `visible'. + * international/mule-diag.el (list-input-methods-1): Output something that's independent of Emacs' version. 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))))