Preserve point when storing link in Gnus nnir groups

* lisp/org-gnus.el: (org-gnus-store-link) This fixes a similar issue
  as commit 84b329516e, but for
  nnir search groups in gnus.
This commit is contained in:
Matt Lundin 2017-11-29 12:37:07 -06:00 committed by Nicolas Goaziou
parent 84b329516e
commit dd3bf50adf
1 changed files with 2 additions and 1 deletions

View File

@ -123,7 +123,8 @@ If `org-store-link' was called with a prefix arg the meaning of
(save-excursion
(car (nnvirtual-map-article (gnus-summary-article-number)))))
(`(nnir . ,_)
(nnir-article-group (gnus-summary-article-number)))
(save-excursion
(nnir-article-group (gnus-summary-article-number))))
(_ gnus-newsgroup-name)))
(header (with-current-buffer gnus-summary-buffer
(gnus-summary-article-header)))