Merge branch 'maint'

2017-11-29 19:03:22 +01:00 · 2017-11-29 19:03:22 +01:00 · 326b2e85e4
parent fada34bb97 84b329516e
commit 326b2e85e4
1 changed files with 2 additions and 1 deletions
--- a/lisp/org-gnus.el
+++ b/lisp/org-gnus.el
@ -120,7 +120,8 @@ If `org-store-link' was called with a prefix arg the meaning of
     (let* ((group
 	     (pcase (gnus-find-method-for-group gnus-newsgroup-name)
 	       (`(nnvirtual . ,_)
-		(car (nnvirtual-map-article (gnus-summary-article-number))))
+		(save-excursion
+		  (car (nnvirtual-map-article (gnus-summary-article-number)))))
 	       (`(nnir . ,_)
 		(nnir-article-group (gnus-summary-article-number)))
 	       (_ gnus-newsgroup-name)))