[Emacs-diffs] master d15d72b: Check Gnus group names when reading from browse server

[Eric Abrahamsen]

branch: master
commit d15d72b27de3db2f7e49398c7d3da9465b774398
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>

    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.
---
 lisp/gnus/gnus-srvr.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/gnus/gnus-srvr.el b/lisp/gnus/gnus-srvr.el
index dfca5e9..34ebd00 100644
--- a/lisp/gnus/gnus-srvr.el
+++ b/lisp/gnus/gnus-srvr.el
@@ -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