diff --git a/lisp/org-gnus.el b/lisp/org-gnus.el index 687bc08b1..27a968f75 100644 --- 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)))