From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on inbox.vuxu.org X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=DKIM_INVALID,DKIM_SIGNED, HEADER_FROM_DIFFERENT_DOMAINS,RCVD_IN_DNSWL_MED,RCVD_IN_MSPIKE_H3, RCVD_IN_MSPIKE_WL,T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.4 Received: from mx1.math.uh.edu (mx1.math.uh.edu [129.7.128.32]) by inbox.vuxu.org (Postfix) with ESMTP id 6A56D2BBBE for ; Tue, 20 Feb 2024 17:18:35 +0100 (CET) Received: from lists1.math.uh.edu ([129.7.128.208]) by mx1.math.uh.edu with esmtps (TLS1.3) tls TLS_AES_256_GCM_SHA384 (Exim 4.97.1) (envelope-from ) id 1rcSpA-0000000GlzP-0u1Q for ml@inbox.vuxu.org; Tue, 20 Feb 2024 10:18:32 -0600 Received: from lists1.math.uh.edu ([127.0.0.1] helo=lists.math.uh.edu) by lists1.math.uh.edu with smtp (Exim 4.97.1) (envelope-from ) id 1rcSpA-00000000jNT-07fD for ml@inbox.vuxu.org; Tue, 20 Feb 2024 10:18:28 -0600 Received: from mx2.math.uh.edu ([129.7.128.33]) by lists1.math.uh.edu with esmtp (Exim 4.97.1) (envelope-from ) id 1rcSp7-00000000jNK-0zYt for ding@lists.math.uh.edu; Tue, 20 Feb 2024 10:18:25 -0600 Received: from quimby.gnus.org ([95.216.78.240]) by mx2.math.uh.edu with esmtps (TLS1.3) tls TLS_AES_256_GCM_SHA384 (Exim 4.97.1) (envelope-from ) id 1rcSp2-0000000Dj0m-1UAg for ding@lists.math.uh.edu; Tue, 20 Feb 2024 10:18:25 -0600 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnus.org; s=20200322; h=Content-Type:MIME-Version:Message-ID:Date:References: In-Reply-To:Subject:Cc:To:From:Sender:Reply-To:Content-Transfer-Encoding: Content-ID:Content-Description:Resent-Date:Resent-From:Resent-Sender: Resent-To:Resent-Cc:Resent-Message-ID:List-Id:List-Help:List-Unsubscribe: List-Subscribe:List-Post:List-Owner:List-Archive; bh=5Pc717cKBWFRybYoFuv4/zYTYyiZlcSVQKfW4C3G85M=; b=o00cKQtQ5EG94E/p1azsX0yqTv NJjkvGLRIwIy3P4nTz2rsh3k1YdqQAG47+KC46Q7c9qKPc9ahxwlZ6YRbp3UA+ByvujDdK737H4MD e4cXxLm/5Fb+70cNtAD3lQoKyrQucCqwAdvnFnGMqjjbqT9VkgKxewlVm/Vn6+dc9ESU=; Received: from ore.jhcloos.com ([192.40.56.151]) by quimby.gnus.org with esmtps (TLS1.3:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1rcSos-0004Xz-Fs for ding@gnus.org; Tue, 20 Feb 2024 17:18:14 +0100 Received: from oxygen.localdomain (oxygen [192.168.1.8]) by ore.jhcloos.com (Postfix) with ESMTP id 32CCB1DF05; Tue, 20 Feb 2024 16:18:05 +0000 (UTC) Received: from nitrogen.jhcloos.org (nitrogen.jhcloos.org [192.168.1.7]) by oxygen.localdomain (Postfix) with ESMTP id A0C86840668; Tue, 20 Feb 2024 16:18:04 +0000 (UTC) Received: by nitrogen.jhcloos.org (Postfix, from userid 500) id 9C4D915B36; Tue, 20 Feb 2024 16:18:04 +0000 (-00) From: James Cloos To: Eric Abrahamsen Cc: ding@gnus.org Subject: Re: gnus-group-change-level In-Reply-To: <875xyjlmqz.fsf@ericabrahamsen.net> (Eric Abrahamsen's message of "Mon, 19 Feb 2024 21:37:24 -0800") References: <87le7ly3hn.fsf@igel.home> <87ttm5psvr.fsf@ericabrahamsen.net> <87ttm5mt8a.fsf@ericabrahamsen.net> <87il2lmbfm.fsf@ericabrahamsen.net> <875xyjlmqz.fsf@ericabrahamsen.net> User-Agent: Gnus/5.13 (Gnus v5.13) Face: iVBORw0KGgoAAAANSUhEUgAAABAAAAAQAgMAAABinRfyAAAACVBMVEX///8ZGXBQKKnCrDQ3 AAAAJElEQVQImWNgQAAXzwQg4SKASgAlXIEEiwsSIYBEcLaAtMEAADJnB+kKcKioAAAAAElFTkSu QmCC Copyright: Copyright 2024 James Cloos OpenPGP: 0x997A9F17ED7DAEA6; url=https://jhcloos.com/public_key/0x997A9F17ED7DAEA6.asc OpenPGP-Fingerprint: E9E9 F828 61A4 6EA9 0F2B 63E7 997A 9F17 ED7D AEA6 Date: Tue, 20 Feb 2024 11:18:04 -0500 Message-ID: MIME-Version: 1.0 Content-Type: text/plain List-ID: Precedence: bulk >>>>> "EA" == Eric Abrahamsen writes: EA> (let ((level 55)) EA> (dolist (grp very-long-list-of-group-names) EA> (when-let ((entry (gnus-group-entry grp))) EA> (setcar (cdadr entry) level)))) Ah. Cool. As a first step I tried out: (cdadr (gnus-group-entry "nnimap+oxygen:ding@gnus.org")) since ding was at point and thus easy to copy-n-yank. It errored out that (listp 0) return nil. Some experimentation showed that: (cadadr (gnus-group-entry "nnimap+oxygen:ding@gnus.org")) returned the cons (11 . 15), where 11 is the current level. (I'm not sure what that cons' cdr is.) I see aroung 7% of the groups' lines in .newsrc.eld have just an integer at that point for level, whereas the others have such a cons. Eg this returns just the integer 11: (cadadr (gnus-group-entry "nnimap+oxygen:GitHub-Torvalds")) I take it setcar will not do the right thing in such cases, yes? And something like a cl-typecase would be required? Is cadadr setf-able in emacs? Thanks for the help! P.S. setting (nnimap-expunge never) or (nnimap-expunge 'never) in an entry in gnus-secondary-select-methods doesn't seem to do anything. dovecot removes the files everytime gnus quits the *Summary* buffer. I want to set \Delete but not to expunge... -JimC -- James Cloos OpenPGP: https://jhcloos.com/0x997A9F17ED7DAEA6.asc