From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/86327 Path: news.gmane.org!not-for-mail From: asjo@koldfront.dk (Adam =?utf-8?Q?Sj=C3=B8gren?=) Newsgroups: gmane.emacs.gnus.general Subject: Re: nnml groups showing up with '*' at startup Date: Mon, 23 Nov 2015 19:02:15 +0100 Organization: koldfront - analysis & revolution, Copenhagen, Denmark Message-ID: <87fuzwegrc.fsf@tullinup.koldfront.dk> References: <874mgete9f.fsf@tullinup.koldfront.dk> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit X-Trace: ger.gmane.org 1448301822 11009 80.91.229.3 (23 Nov 2015 18:03:42 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 23 Nov 2015 18:03:42 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M34559@lists.math.uh.edu Mon Nov 23 19:03:29 2015 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from lists1.math.uh.edu ([129.7.128.208]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1a0vSQ-00039d-BF for ding-account@gmane.org; Mon, 23 Nov 2015 19:03:18 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by lists1.math.uh.edu with smtp (Exim 4.85) (envelope-from ) id 1a0vRm-0001yZ-2v; Mon, 23 Nov 2015 12:02:38 -0600 Original-Received: from mx1.math.uh.edu ([129.7.128.32]) by lists1.math.uh.edu with esmtps (TLSv1.2:AES128-GCM-SHA256:128) (Exim 4.85) (envelope-from ) id 1a0vRi-0001xx-AO for ding@lists.math.uh.edu; Mon, 23 Nov 2015 12:02:34 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx1.math.uh.edu with esmtps (TLSv1.2:DHE-RSA-AES128-SHA:128) (Exim 4.85) (envelope-from ) id 1a0vRf-0004CR-BO for ding@lists.math.uh.edu; Mon, 23 Nov 2015 12:02:34 -0600 Original-Received: from plane.gmane.org ([80.91.229.3]) by quimby.gnus.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:256) (Exim 4.80) (envelope-from ) id 1a0vRd-0006KW-AT for ding@gnus.org; Mon, 23 Nov 2015 19:02:29 +0100 Original-Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1a0vRZ-0001Zv-Dp for ding@gnus.org; Mon, 23 Nov 2015 19:02:25 +0100 Original-Received: from virgil.koldfront.dk ([2.110.51.43]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 23 Nov 2015 19:02:25 +0100 Original-Received: from asjo by virgil.koldfront.dk with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 23 Nov 2015 19:02:25 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 52 Original-X-Complaints-To: usenet@ger.gmane.org X-Gmane-NNTP-Posting-Host: virgil.koldfront.dk OpenPGP: id=49D0746121BDE416; url=http://asjo.koldfront.dk/gpg.asc Mail-Follow-Up-To: never X-Face: )qY&CseJ?.:=8F#^~GcSA?F=9eu'{KAFfL1C3/A&:nE?PW\i65"ba0NS)97,Q(^@xk}n4Ou rPuR#V8I(J_@~H($[ym:`K_+]*kjvW>xH5jbgLBVFGXY:(#4P>zVBklLbdL&XxL\M)%T}3S/IS9lMJ ^St'=VZBR Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:86327 Archived-At: Michael writes: > The other change - the one probably responsible for this problem - > unbreaks the functionality of the per-group mail source. I don't know what that means. Likely that I am not using it :-) > If you're not using this feature, could you pinpoint the hunk (out of 2) > that's causing it? (Easily done by first removing the > `nnml-retrieve-groups` defun.) That'd help me find out where it's > coming from. Yup, this makes the symptom disappear: --- lisp/nnml.el | 17 ----------------- 1 file changed, 17 deletions(-) diff --git a/lisp/nnml.el b/lisp/nnml.el index 33eae1c..a2947c0 100644 --- a/lisp/nnml.el +++ b/lisp/nnml.el @@ -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) -- 2.6.2 -- "It's not denial. I'm just very selective about the Adam Sjøgren reality I accept." asjo@koldfront.dk