Failure to automatically restart imap client process?

[Stefan Monnier]

Every once in a while, when I get back to my Gnus process to read mail,
I get a backtrace such as the one below.  If I ignore the error and try
again, the problem typically resolves itself.  It's maybe because the
process still existed when I hit gnus-group-select-group but died before
reaching process-send-string (probably because the connection had timed out
already), I don't know.


        Stefan


Debugger entered--Lisp error: (error "Process imap not running")
  process-send-string(#<process imap> "1955 UID SEARCH SEEN
\n")
  imap-send-command-1("1955 UID SEARCH SEEN")
  imap-send-command("UID SEARCH SEEN" nil)
  imap-send-command-wait("UID SEARCH SEEN")
  imap-search("SEEN")
  nnimap-request-update-info-internal("emacs" ("nnimap+diro:emacs" 2 ((1 . 
43252)) ((seen 5882 6313 8390 8708 8751 8889 8924 8962 9385 10025 10061 10365 
10658 10803 10938 10974 10976 11037 11073 11943 12348 12356 12361 13107 13564 
13629 13815 14019 14210 14314 14320 14346 14907 ... 15319 15580 15618 15791 
17594 17925 17983 18241 ... ... 18306 ... ... 18315 ... ...) (forward 35349 
36711) (expire ... ... ... ... ... ... ... 42807 42809 ... ... ... ... ... 
42832 42834 ... 42842 ... ... 42852 ... ... ... 42880 ... ... 42904 ... ... ... 
... 42935 42937 ... ... ... 42964 ... ... 42979 42981 ... ... ... 43000 ... ... 
43020 ...) (reply 5882 14019 15618 18241 18657 18660 ... 18763 19532 19766 
20567 20937 20991 21179 21516 22563 23872 24352 24901 25744 25914 26040 29165 
29208 29237 29247 ... 29336 29339 29375 29406 29478 29480 29490 29498 ... 29568 
... 29611 29632 ... 29663 29704 29723 29740 29742 29748 ... 29763 ...) (tick 
5882 8390 8708 10061 10658 10803 10938 11943 12348 12356 12361 13107 13564 
13629 13815 14019 14210 14907 15580 15618 17594 17983 18241 ... 18551 18657 
18660 ... 18723 18763 18768 18941 19530 ... 19766 19878 20240 20567 20699 20929 
20937 20961 20991 21179 21313 21317 21463 21485 21516 ...)) "nnimap:diro" 
((uidvalidity . "1062436086") (to-list . "address@hidden"))) "diro")
  nnimap-request-group("emacs" "diro" t)
  gnus-request-group("nnimap+diro:emacs" t)
  gnus-select-newsgroup("nnimap+diro:emacs" nil nil)
  gnus-summary-read-group-1("nnimap+diro:emacs" nil t nil nil nil)
  gnus-summary-read-group("nnimap+diro:emacs" nil t nil nil nil nil)
  gnus-group-read-group(nil t)
  gnus-group-select-group(nil)
  call-interactively(gnus-group-select-group nil nil)