1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-22 14:01:47 -07:00

Check Gnus group names when reading from browse server

* lisp/gnus/gnus-srvr.el (gnus-browse-read-group): If the group in
  question belongs to the native server, the name has to be shortened
  before we check it with `gnus-get-info'. It might work otherwise
  with nntp, but for backends like nnmaildir that have their own
  accounting system, creating an ephemeral group won't work.
This commit is contained in:
Eric Abrahamsen 2018-11-20 10:28:10 -08:00
parent e0799e6713
commit d15d72b27d

View file

@ -925,7 +925,11 @@ buffer.
"Enter the group at the current line.
If NUMBER, fetch this number of articles."
(interactive "P")
(let ((group (gnus-browse-group-name)))
(let* ((full-name (gnus-browse-group-name))
(group (if (gnus-native-method-p
(gnus-find-method-for-group full-name))
(gnus-group-short-name full-name)
full-name)))
(if (or (not (gnus-get-info group))
(gnus-ephemeral-group-p group))
(unless (gnus-group-read-ephemeral-group