From 73bb83c67dbda24c7b4455073482020b5e4e357b Mon Sep 17 00:00:00 2001 Message-ID: <73bb83c67dbda24c7b4455073482020b5e4e357b.1738513362.git.yantar92@posteo.net> From: Ihor Radchenko Date: Sun, 2 Feb 2025 17:20:50 +0100 Subject: [PATCH] ol-gnus: Do not err when gnus frame is dead MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * lisp/ol-gnus.el (org-gnus-follow-link): Do not try to switch to dead frame. Reported-by: Björn Bidar Link: https://list.orgmode.org/orgmode/87o6zn4m40.fsf@/ --- lisp/ol-gnus.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/ol-gnus.el b/lisp/ol-gnus.el index 5cddc3790a..ac2cadbc66 100644 --- a/lisp/ol-gnus.el +++ b/lisp/ol-gnus.el @@ -228,7 +228,9 @@ (defun org-gnus-follow-link (&optional group article) "Follow a Gnus link to GROUP and ARTICLE." (require 'gnus) (funcall (org-link-frame-setup-function 'gnus)) - (when gnus-other-frame-object (select-frame gnus-other-frame-object)) + (when (and gnus-other-frame-object + (frame-live-p gnus-other-frame-object)) + (select-frame gnus-other-frame-object)) (let ((group (org-no-properties group)) (article (org-no-properties article))) (cond -- 2.47.1