From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 30 Jul 2021 11:32:54 +0000 (+0200)
Subject: Fix issue with mml-preview from outside Gnus
X-Git-Tag: emacs-28.0.90~1652
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0bd1346318fe9ef4eba91905172d30a030d7da18;p=emacs.git

Fix issue with mml-preview from outside Gnus

* lisp/gnus/gnus-art.el (gnus-mime-display-alternative): Be more
resilient when running from outside Gnus.
---

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index b989446792b..fb0295d0703 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -6238,8 +6238,9 @@ If nil, don't show those extra buttons."
 	      (gnus-display-mime preferred)
 	    (let ((mail-parse-charset gnus-newsgroup-charset)
 		  (mail-parse-ignored-charsets
-		   (with-current-buffer gnus-summary-buffer
-		     gnus-newsgroup-ignored-charsets)))
+                   (and (buffer-live-p gnus-summary-buffer)
+		        (with-current-buffer gnus-summary-buffer
+		          gnus-newsgroup-ignored-charsets))))
 	      (gnus-bind-mm-vars (mm-display-part preferred))
 	      ;; Do highlighting.
 	      (save-excursion