]> git.eshelyaron.com Git - emacs.git/commitdiff
Check Gnus group names when reading from browse server
authorEric Abrahamsen <eric@ericabrahamsen.net>
Tue, 20 Nov 2018 18:28:10 +0000 (10:28 -0800)
committerEric Abrahamsen <eric@ericabrahamsen.net>
Wed, 21 Nov 2018 16:31:08 +0000 (08:31 -0800)
* 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.

lisp/gnus/gnus-srvr.el

index dfca5e9d2cbce7638b6d62df54c4a44fb62c31a9..34ebd00ef246cdbf2a33003d0aeb4221ca25bf04 100644 (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