From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on inbox.vuxu.org X-Spam-Level: X-Spam-Status: No, score=-2.4 required=5.0 tests=DKIM_SIGNED,DKIM_VALID, DKIM_VALID_AU,FREEMAIL_FROM,RCVD_IN_DNSWL_MED,RCVD_IN_MSPIKE_H3, RCVD_IN_MSPIKE_WL autolearn=ham autolearn_force=no version=3.4.4 Received: (qmail 28400 invoked from network); 21 Feb 2021 03:03:45 -0000 Received: from mx1.math.uh.edu (129.7.128.32) by inbox.vuxu.org with ESMTPUTF8; 21 Feb 2021 03:03:45 -0000 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.94) (envelope-from ) id 1lDf28-003Kwc-C7 for ml@inbox.vuxu.org; Sat, 20 Feb 2021 21:03:44 -0600 Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by lists1.math.uh.edu with smtp (Exim 4.94) (envelope-from ) id 1lDf27-00E1Vl-QO for ml@inbox.vuxu.org; Sat, 20 Feb 2021 21:03:43 -0600 Received: from mx2.math.uh.edu ([129.7.128.33]) by lists1.math.uh.edu with esmtps (TLS1.3) tls TLS_AES_256_GCM_SHA384 (Exim 4.94) (envelope-from ) id 1lDf27-00E1Vg-31 for ding@lists.math.uh.edu; Sat, 20 Feb 2021 21:03:43 -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.94) (envelope-from ) id 1lDf25-003Epr-EY for ding@lists.math.uh.edu; Sat, 20 Feb 2021 21:03:42 -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:In-Reply-To:Date: References:Subject:To:From:Sender:Reply-To:Cc: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=UJsqvM4PHYW/N4fK9lm5wFGzYqW821FXHnl58tuZdmg=; b=eWUTtb0MaXWsTjQMmOgZCbTtY/ TbiAM8oDxDhxdS+otSQ0J+lvvvAn/4a/JPNT828g3tPFNS7eUrVHdrBEKEGPYvBNMfbLuSzqebiN2 f02A6YJyNX7AWW+RjwbhtBNknfiWLT7rcYFvV7vOf9MeTVaIa6aIBda2OpdpBpoOaI+E=; Received: from mail-qk1-x72f.google.com ([2607:f8b0:4864:20::72f]) by quimby.gnus.org with esmtps (TLS1.3:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.92) (envelope-from ) id 1lDf1x-0002SO-GK for ding@gnus.org; Sun, 21 Feb 2021 04:03:37 +0100 Received: by mail-qk1-x72f.google.com with SMTP id z190so9528470qka.9 for ; Sat, 20 Feb 2021 19:03:33 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:to:subject:references:date:in-reply-to:message-id:user-agent :mime-version; bh=UJsqvM4PHYW/N4fK9lm5wFGzYqW821FXHnl58tuZdmg=; b=rW4sVe5QupPA21p/gZEa7Bx12bXy5OJdOzBAXzHNvKYbjsb04w+awsDg/W/NnFyGsu atAuOulWoyb6kkYd8uVL2/um7mO177YC4n6Zw/bx0h6gj2UUi03dT2KLlat/arSv4m68 XPEzc3C9W6fhT1g8etIT9io9f8IfNLsffX89518vT9v2CcfzLVDBpcpZAFxhaTHoZtHx QMCn+Wh5UA8ndh1zqim9rS68r0j9HBZcc/QtxY/27vCqsK50GMpTGHYuQcyeNtaL6Bfl CuRS/g558ywMBy3a9bFVGnx6qgOd9KrDQOuP5VAU7VBkOqcMp1llDw/67hh+r+4ChmeQ YbVQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:subject:references:date:in-reply-to :message-id:user-agent:mime-version; bh=UJsqvM4PHYW/N4fK9lm5wFGzYqW821FXHnl58tuZdmg=; b=TdFW4rZejIZgTIDs0BD6z4keNek2/ENDZBnvX/zjrt/m3VrEipRwyj5YZF1E73pISP j8ax7pgZ4uu8oYxhVc0LjTnR4tJY2z023elcTxfN+S4MkUirIrhwgREqDOvtaDJ1oUw0 hm52ufl4p7bnZg+6LDYIFuRK9RxCANutiZglnsNgapqCwOo9+SP8yA0sksDqtz28wkXw 8Ahj49pIJDJnBuCxP8etAiDDSaoj3x7LNSGOks4zU2L75axVD63Qm8z61SpQ4oVS5SSx mvWDGgL4AH1CADL/PfFgT6mc81h8EuYcOegihLnX5uZLzoQbYaFKMrda+iLhomGUajn+ epZQ== X-Gm-Message-State: AOAM531IWohpTE5irYwf52rDwVI0RaNn9aMyo6WCxmu/rAHWVZaV7CiG fjezGoS9smqNwHm9XOk9XCL7ukXzp/8= X-Google-Smtp-Source: ABdhPJzTkgoBJplx1EhdJoT/yCtGyxB1d5px9/7TYLH6z5BcGlODSWzaKRcmPguen5h4E8oXAN0Etw== X-Received: by 2002:a37:4a94:: with SMTP id x142mr16235645qka.160.1613876610927; Sat, 20 Feb 2021 19:03:30 -0800 (PST) Received: from localhost (pool-71-190-212-171.nycmny.fios.verizon.net. [71.190.212.171]) by smtp.gmail.com with ESMTPSA id x63sm9631834qkb.22.2021.02.20.19.03.30 for (version=TLS1_2 cipher=ECDHE-ECDSA-CHACHA20-POLY1305 bits=256/256); Sat, 20 Feb 2021 19:03:30 -0800 (PST) From: dick.r.chiang@gmail.com X-Google-Original-From: ding@gnus.org To: ding@gnus.org Subject: Re: how can I convert the To field to CC References: <87k0r3kc70.fsf@mat.ucm.es> <87a6rzmtmw.fsf@zoho.eu> <87blcfghv2.fsf@mat.ucm.es> <87k0r27eao.fsf@zoho.eu> <87ft1qe5qd.fsf@mat.ucm.es> <87mtvye3nn.fsf@dick> <87blce5kub.fsf@zoho.eu> <871rda5kav.fsf@zoho.eu> Date: Sat, 20 Feb 2021 22:03:29 -0500 In-Reply-To: <871rda5kav.fsf@zoho.eu> (Emanuel Berg's message of "Sun, 21 Feb 2021 01:36:08 +0100") Message-ID: <87blcedsvy.fsf@dick> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1.91 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain List-ID: Precedence: bulk EB> This also cannot do multiliners I only tested under emacs-27. YMMV. (defun my/message-swap-to-cc () (interactive) (when-let ((to (message-field-value "To")) (cc (message-field-value "Cc"))) (message-replace-header "To" cc "From") (message-replace-header "Cc" to "To"))) (with-temp-buffer (insert "From: ding@gnus.org To: user1, user2. user3 Cc: user4, user5, user6, --text follows this line-- Hello. ") (cl-assert (and (cl-search "user1" (message-field-value "To")) (cl-search "user5" (message-field-value "Cc")))) (my/message-swap-to-cc) (cl-assert (and (cl-search "user5" (message-field-value "To")) (cl-search "user1" (message-field-value "Cc")))))