From: Carsten Dominik <dominik@science.uva.nl>
Date: Wed, 23 Aug 2006 10:07:42 +0000 (+0000)
Subject: (org-follow-gnus-link): Make sure the dedicated
X-Git-Tag: emacs-pretest-22.0.90~909
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=90bb892d7c65ab2d1fe359ad247be0cabc1031cc;p=emacs.git

(org-follow-gnus-link): Make sure the dedicated
	gnus frame is selected.
---

diff --git a/lisp/textmodes/org.el b/lisp/textmodes/org.el
index 1fcac6855d9..ecbcd86d043 100644
--- a/lisp/textmodes/org.el
+++ b/lisp/textmodes/org.el
@@ -9467,6 +9467,7 @@ onto the ring."
   "Follow a Gnus link to GROUP and ARTICLE."
   (require 'gnus)
   (funcall (cdr (assq 'gnus org-link-frame-setup)))
+  (if gnus-other-frame-object (select-frame gnus-other-frame-object))
   (if group (gnus-fetch-group group))
   (if article
       (or (gnus-summary-goto-article article nil 'force)