bug#22634: 25.0.90; Gnus: Primary mail box disappeared

[Michael Heerdegen <michael_heerdegen@web.de>]

Hello,

the commit "Fix gnus-group-get-new-news-this-group on group with closed
server" makes my primary mailbox, which is

gnus-select-method ->
(nnimap "Michael_Heerdegen@web.de" (nnimap-address "imap.web.de"))

disappear from the standard view of subscribed groups after calling
`gnus'. The server is contacted, but I have to hit L to make the group
appear, and then it looks like

*.    *  243!  INBOX

i.e. number of unseen and unread articles is not shown.  I can enter it
OTOH.

Here is a backtrace of what I speculate could go wrong:

--8<---------------cut here---------------start------------->8---
  nnimap-open-server(nil nil t)
  (setq open-result (nnimap-open-server (nth 1 method) (nthcdr 2 method) no-reconnect))
  (let ((method (gnus-server-to-method server))) (setq open-result (nnimap-open-server (nth 1 method) (nthcdr 2 method) no-reconnect)))
  (progn (let ((method (gnus-server-to-method server))) (setq open-result (nnimap-open-server (nth 1 method) (nthcdr 2 method) no-reconnect))))
  (if (and server (not (nnimap-server-opened server))) (progn (let ((method (gnus-server-to-method server))) (setq open-result (nnimap-open-server (nth 1 method) (nthcdr 2 method) no-reconnect)))))
  (when (and server (not (nnimap-server-opened server))) (let ((method (gnus-server-to-method server))) (setq open-result (nnimap-open-server (nth 1 method) (nthcdr 2 method) no-reconnect))))
  (let ((open-result t)) (when (and server (not (nnimap-server-opened server))) (let ((method (gnus-server-to-method server))) (setq open-result (nnimap-open-server (nth 1 method) (nthcdr 2 method) no-reconnect)))) (cond ((not open-result) nil) ((not group) t) (t (with-current-buffer (nnimap-buffer) (let ((result (nnimap-command "%s %S" ... ...))) (when (car result) (setf (nnimap-group nnimap-object) group (nnimap-select-result nnimap-object) result) result))))))
  nnimap-change-group(nil "Michael_Heerdegen@web.de" t)
  [...]
  gnus-get-unread-articles(nil nil)
  gnus-setup-news(nil nil nil)
  [...]
  gnus-1(nil nil nil)
  gnus(nil)
  funcall-interactively(gnus nil)
  call-interactively(gnus nil nil)
  command-execute(gnus)
--8<---------------cut here---------------end--------------->8---

Please tell me if you need more info


Thanks,

Michael.



In GNU Emacs 25.0.90.1 (x86_64-pc-linux-gnu, GTK+ Version 3.18.7)
 of 2016-02-09 built on drachen
Repository revision: 37eae51767fc013eec3411c174d27bd8a18e5bc8
Windowing system distributor 'The X.Org Foundation', version 11.0.11800000
System Description:	Debian GNU/Linux testing (stretch)

Configured features:
XPM JPEG TIFF GIF PNG RSVG IMAGEMAGICK SOUND DBUS GSETTINGS NOTIFY
LIBXML2 FREETYPE XFT ZLIB TOOLKIT_SCROLL_BARS GTK3 X11

Important settings:
  value of $LC_ALL: de_DE.utf8
  value of $LC_COLLATE: C
  value of $LC_TIME: C
  value of $LANG: de_DE.utf8
  locale-coding-system: utf-8-unix

Major mode: Emacs-Lisp