Hi François,

François Pinard <pin...@iro.umontreal.ca> writes:

> One possibility (untested, so I'm not sure) is that when following a
> "gnus:" link, Org could use something like:
>
>    (let ((gnus-mark-article-hook nil))
>      (ACCESS-THE-gnus:-LINK))

I attach a patch to see if it does what you want.

This is from a quick exploration, and while testing it,
somes links to gwene.org blog entries were throwing a
501 error message (but still display the article.)

Take it as a basis for clarifying the discussion, not
really a solution right now!

diff --git a/lisp/org-gnus.el b/lisp/org-gnus.el
index e368a14..968c556 100644
--- a/lisp/org-gnus.el
+++ b/lisp/org-gnus.el
@@ -262,7 +262,7 @@ If `org-store-link' was called with a prefix arg the meaning of
 	       (cond
 		((eq backend 'nndoc)
 		 (if (gnus-group-read-group t nil group)
-		     (gnus-summary-goto-article article nil t)
+		     (gnus-summary-display-article article)
 		   (message "Couldn't follow gnus link.  %s"
 			    "The summary couldn't be opened.")))
 		(t
@@ -283,7 +283,7 @@ If `org-store-link' was called with a prefix arg the meaning of
 					(1+ articles)
 				      (* articles 2))))
 		   (if group-opened
-		       (gnus-summary-goto-article article nil t)
+		       (gnus-summary-display-article article)
 		     (message "Couldn't follow gnus link.  %s"
 			      "The summary couldn't be opened."))))))
 	   (quit (message "Couldn't follow gnus link.  %s"
-- 
 Bastien

Reply via email to