(gnus-summary-preview-mime-message): Protect against dead windows.

diff --git a/ChangeLog b/ChangeLog
index ce97e2a..7b6a099 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2002-01-21  TSUCHIYA Masatoshi  <tsuchiya@namazu.org>
 
+       * lisp/gnus-sum.el (gnus-summary-preview-mime-message): Protect
+       against dead windows.
+
        * lisp/nnheader.el (mm-encode-coding-string): Alias to
        `encode-coding-string'.
        (mm-decode-coding-string): Alias to 'decode-coding-string'.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 05f181f..93576e8 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -6236,7 +6236,9 @@ The state which existed when entering the ephemeral is reset."
   (let ((gnus-break-pages nil)
        (gnus-show-mime t))
     (gnus-summary-select-article gnus-show-all-headers t))
-  (select-window (get-buffer-window gnus-article-buffer)))
+  (let ((w (get-buffer-window gnus-article-buffer)))
+    (when w
+      (select-window (get-buffer-window gnus-article-buffer)))))
 
 ;;; Dead summaries.