procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove nnml-retrieve-groups that is unnecessary and somewhat problematic

Browse source 
* lisp/gnus/nnml.el (nnml-retrieve-groups): Remove.  See:
<http://thread.gmane.org/gmane.emacs.gnus.general/86308> and
<http://thread.gmane.org/gmane.emacs.gnus.general/86321>
This commit is contained in:
Katsumi Yamaoka 2015-11-25 13:47:46 +00:00
parent d8143fa89b
commit 849c1f0180
1 changed files with 0 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
lisp/gnus/nnml.el
View file

@ -268,23 +268,6 @@ non-nil.")
(max (1+ (- (cdr active) (car active))) 0)
(car active) (cdr active) group)))))))
(deffoo nnml-retrieve-groups (groups &optional server)
(when nnml-get-new-mail
(if (nnmail-get-new-mail-per-group)
(dolist (group groups)
(nnml-request-scan group server))
(nnml-request-scan nil server)))
(with-current-buffer nntp-server-buffer
(erase-buffer)
(dolist (group groups)
(let* ((entry (assoc group nnml-group-alist))
(active (nth 1 entry)))
(if (consp active)
(insert (format "211 %d %d %d %s\n"
(max (1+ (- (cdr active) (car active))) 0)
(car active) (cdr active) group))))))
'group)
(deffoo nnml-request-scan (&optional group server)
(setq nnml-article-file-alist nil)
(nnml-possibly-change-directory group server)