GNU bug report logs - #72128
31.0.50; [PATCH] Remove `smtpmail-address-buffer'

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: emacs; Severity: wishlist; Reported by: Manuel Giraud <manuel@HIDDEN>; Keywords: patch; Done: Stefan Kangas <stefankangas@HIDDEN>; Maintainer for emacs is bug-gnu-emacs@HIDDEN.

Message received at 72128-done <at> debbugs.gnu.org:


Received: (at 72128-done) by debbugs.gnu.org; 13 Feb 2025 13:23:56 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Thu Feb 13 08:23:56 2025
Received: from localhost ([127.0.0.1]:41358 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1tiZC7-0004WS-Uw
	for submit <at> debbugs.gnu.org; Thu, 13 Feb 2025 08:23:56 -0500
Received: from ledu-giraud.fr ([51.159.28.247]:46762)
 by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.84_2) (envelope-from <manuel@HIDDEN>)
 id 1tiZC5-0004WG-5o
 for 72128-done <at> debbugs.gnu.org; Thu, 13 Feb 2025 08:23:54 -0500
DKIM-Signature: v=1; a=ed25519-sha256; c=simple/simple; s=ed25519; bh=AhWG+hsr
 ACTE00zNwkxysQ+S06PEIM0V4jfQxGb2hBI=;
 h=date:references:in-reply-to:
 subject:cc:to:from; d=ledu-giraud.fr; b=PXmp8oSnbXagxDmZlcR8uZAei2GiAY
 yUUDDCyZS/wgzGogyplEmK14/QZclHEu5qyiNZ5uGLlM3G/Hnce4C/Cw==
DKIM-Signature: v=1; a=rsa-sha256; c=simple/simple; s=rsa; bh=AhWG+hsrACTE00zN
 wkxysQ+S06PEIM0V4jfQxGb2hBI=;
 h=date:references:in-reply-to:subject:
 cc:to:from; d=ledu-giraud.fr; b=fdcM+uiJm7ffcVlDJ1zLgTza2Kjtk5tHYG2fIQ
 Q/gquYWdylHrzoXvCK8Pv4EAxgYRv86Wo6UwkX//XHjoFAmxv0WhSjMdUisUmgIT59ARQy
 uW5ctIfzFTKnfrNzGo2C7DGrcwhyMx+MmaXLfxWf1GP5uXZ9wSuS6QORoahAVbI5aWbiyX
 vRTv/Deu/nwZ35VvoLG10oZESwdW3YyuPsxK+nXihJfyNUctK5bA1nFWLGszbz768i0mXh
 RWYPs+eVDzf5mpu3pzBmFhp24afVhlkbQuDQx8FJWnqGllsp97Epfj6QcfEgOvvM6tYreS
 zvJmAxQOiz9T1G/6jGCBNoUg==
Received: from computer (<unknown> [10.1.1.1])
 by ledu-giraud.fr (OpenSMTPD) with ESMTPSA id a107fc28
 (TLSv1.3:TLS_AES_256_GCM_SHA384:256:NO); 
 Thu, 13 Feb 2025 14:23:49 +0100 (CET)
From: Manuel Giraud <manuel@HIDDEN>
To: Stefan Kangas <stefankangas@HIDDEN>
Subject: Re: bug#72128: 31.0.50; [PATCH] Remove `smtpmail-address-buffer'
In-Reply-To: <CADwFkmmj_kxOSivrvBHr-hL3O+J-Bsz1Qh3TibPdEignx9rr8g@HIDDEN>
References: <875xt632x8.fsf@HIDDEN>
 <CADwFkmmj_kxOSivrvBHr-hL3O+J-Bsz1Qh3TibPdEignx9rr8g@HIDDEN>
Date: Thu, 13 Feb 2025 14:23:47 +0100
Message-ID: <87ikpekmfw.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13)
MIME-Version: 1.0
Content-Type: text/plain
X-Spam-Score: 0.0 (/)
X-Debbugs-Envelope-To: 72128-done
Cc: 72128-done <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

Stefan Kangas <stefankangas@HIDDEN> writes:

> Version: 31.1
>
> Manuel Giraud <manuel@HIDDEN> writes:
>
>> I was reading "smtpmail.el".  Here is a simple patch that should not
>> change the functionality but, I think, is more idiomatic.
>
> I think you're right, but I moved the with-temp-buffer call into the
> function itself, which made the patch shorter.  Installed on master as
> commit e2991272f28, and closing.

It's even better.  Thanks.
-- 
Manuel Giraud




Information forwarded to bug-gnu-emacs@HIDDEN:
bug#72128; Package emacs. Full text available.

Message received at 72128-done <at> debbugs.gnu.org:


Received: (at 72128-done) by debbugs.gnu.org; 11 Feb 2025 19:32:14 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Tue Feb 11 14:32:14 2025
Received: from localhost ([127.0.0.1]:58725 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1thvzS-00077i-2G
	for submit <at> debbugs.gnu.org; Tue, 11 Feb 2025 14:32:14 -0500
Received: from mail-ed1-x52a.google.com ([2a00:1450:4864:20::52a]:50629)
 by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128)
 (Exim 4.84_2) (envelope-from <stefankangas@HIDDEN>)
 id 1thvzQ-00077R-A1
 for 72128-done <at> debbugs.gnu.org; Tue, 11 Feb 2025 14:32:12 -0500
Received: by mail-ed1-x52a.google.com with SMTP id
 4fb4d7f45d1cf-5de74599749so4199725a12.1
 for <72128-done <at> debbugs.gnu.org>; Tue, 11 Feb 2025 11:32:12 -0800 (PST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=gmail.com; s=20230601; t=1739302326; x=1739907126; darn=debbugs.gnu.org;
 h=cc:to:subject:message-id:date:mime-version:references:in-reply-to
 :from:from:to:cc:subject:date:message-id:reply-to;
 bh=7DHJwqSyDZVtxtgg2ka++O4fS9dfLFrz4dWw1WPDLjU=;
 b=l532ZUa1dxZ2YXHpTOGtm03ZKR4rq5sL/cu/wBBjow+p4J7gEOgO9kZ5Hqh1YRyb7q
 A883DEntq/dmcicORGq+xKmpnIHs+uAL+ZwowhtXzuk+0pwlykswFOHMyhw3kyNjHYFW
 B8f+LFEx6j/2j7QqWqUHPfCmkhNLczYeAnB+q1msRAecRM9BbV+GVKPCQTy2GA318EYR
 Vt4zz6PbCAgiAXhn7yNlJi5gmlbBlgW4ty/0PCB25z8nWFXPDCSUjpqkb7lErfiwqQYj
 RdCPt+7QnpdLO4RW6nBtxN2/A/i0dj5fAnj3s9jL0sr0gApnc5J7vY38FdVVwzlb9Hkp
 IHSg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20230601; t=1739302326; x=1739907126;
 h=cc:to:subject:message-id:date:mime-version:references:in-reply-to
 :from:x-gm-message-state:from:to:cc:subject:date:message-id:reply-to;
 bh=7DHJwqSyDZVtxtgg2ka++O4fS9dfLFrz4dWw1WPDLjU=;
 b=ccmU706ySUue/wj9xgM7MS4A+VxESv4F/UTdXIsibNt1DC4fUkaLhJXEzDjiQdlmXb
 e94SULmUwAvC+u0ZAJYIV7Brj/WsqpdNhtDrsiNEWdBaTZrb3wgZpeTHolMpbC6s3/IV
 BAuAt60mwX8JqEMdv8OSHWpUNZPhJdVqTX9thtfXT+x8TIDG/S5GbqU69MotSCsvfmFg
 ZGFLOKKp8BPTDNYhRLEOZoRkdTi1n0Gjb6MBcInq/vq/ZZN8tCQg43vkcdDKPyxirCl5
 9F0zkBUPFQi2hfgiak7nqVuTQteERrIAuRFn76+/01/EM0FOhXq0xP6Q3x/Bl1DLVwtm
 C6ow==
X-Gm-Message-State: AOJu0YxcGK+1WHzGVxqq62/VuXHBFkluYzRUsnsywaDBqnGL7wgY5gxM
 AKOY62t9ojJjkOhM+hKN9wzKFRXnzpbKBxaS1gQA3MDMexEMXHYaasf1Lq509pkARF7Poy3Or8x
 mh20kOmuMzeMdIVxhmMUZv6fFBPal2wrJYrAg4Q==
X-Gm-Gg: ASbGncsAD6te6FLc6op9ikcerrQ3r6y9238WjE/FxvfseKDjRcPGSFjGO4Y20RIQ6ng
 FSVDbySBwnloY70sCxDD4+QlzGDazTXK+8E1Ck5sm4NGPuGYvFYPbWsWycLRsQAobHJJQoUsSIw
 ==
X-Google-Smtp-Source: AGHT+IGzKv4TJxD8FOHHpENx7UwS5yfBMTuspYHhscdvqDp6rSj1gH0I06SmM/JhNhE18bcbVmGaAJylE0QM3tCoGl4=
X-Received: by 2002:a05:6402:1f11:b0:5dc:c869:da53 with SMTP id
 4fb4d7f45d1cf-5deaddec13amr385370a12.31.1739302325854; Tue, 11 Feb 2025
 11:32:05 -0800 (PST)
Received: from 753933720722 named unknown by gmailapi.google.com with
 HTTPREST; Tue, 11 Feb 2025 11:32:05 -0800
From: Stefan Kangas <stefankangas@HIDDEN>
In-Reply-To: <875xt632x8.fsf@HIDDEN>
References: <875xt632x8.fsf@HIDDEN>
MIME-Version: 1.0
Date: Tue, 11 Feb 2025 11:32:05 -0800
X-Gm-Features: AWEUYZkS9_JlV-MGWJyqdgVQSjPTvzX06MeBYlGxUEcT_ktgvsany5dztRiCA9c
Message-ID: <CADwFkmmj_kxOSivrvBHr-hL3O+J-Bsz1Qh3TibPdEignx9rr8g@HIDDEN>
Subject: Re: bug#72128: 31.0.50; [PATCH] Remove `smtpmail-address-buffer'
To: Manuel Giraud <manuel@HIDDEN>
Content-Type: text/plain; charset="UTF-8"
X-Spam-Score: 0.0 (/)
X-Debbugs-Envelope-To: 72128-done
Cc: 72128-done <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

Version: 31.1

Manuel Giraud <manuel@HIDDEN> writes:

> I was reading "smtpmail.el".  Here is a simple patch that should not
> change the functionality but, I think, is more idiomatic.

I think you're right, but I moved the with-temp-buffer call into the
function itself, which made the patch shorter.  Installed on master as
commit e2991272f28, and closing.




Notification sent to Manuel Giraud <manuel@HIDDEN>:
bug acknowledged by developer. Full text available.
Reply sent to Stefan Kangas <stefankangas@HIDDEN>:
You have taken responsibility. Full text available.
Severity set to 'wishlist' from 'normal' Request was from Stefan Kangas <stefankangas@HIDDEN> to control <at> debbugs.gnu.org. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 15 Jul 2024 18:50:49 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Mon Jul 15 14:50:49 2024
Received: from localhost ([127.0.0.1]:60430 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1sTQme-0007Kv-U6
	for submit <at> debbugs.gnu.org; Mon, 15 Jul 2024 14:50:49 -0400
Received: from lists.gnu.org ([209.51.188.17]:58108)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <manuel@HIDDEN>) id 1sTQmc-0007Km-4E
 for submit <at> debbugs.gnu.org; Mon, 15 Jul 2024 14:50:47 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10])
 by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <manuel@HIDDEN>)
 id 1sTQmY-0004HN-Vc
 for bug-gnu-emacs@HIDDEN; Mon, 15 Jul 2024 14:50:43 -0400
Received: from ledu-giraud.fr ([51.159.28.247])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <manuel@HIDDEN>)
 id 1sTQmS-0002SW-Lz
 for bug-gnu-emacs@HIDDEN; Mon, 15 Jul 2024 14:50:42 -0400
DKIM-Signature: v=1; a=ed25519-sha256; c=simple/simple; s=ed25519; bh=//l4dnP4
 Q3E1MH95LB4w4UZiUwaqdl5tAl8oatqao1Y=; h=date:subject:to:from; 
 d=ledu-giraud.fr;
 b=yJkBZ/7nCE3H8U7aHuCaXhE3fzAMW5bJj70JL1mrWS45eS4php
 h7ToCIy03/2ET+LdnXgAqLcWr8ewry6DNbCQ==
DKIM-Signature: v=1; a=rsa-sha256; c=simple/simple; s=rsa; bh=//l4dnP4Q3E1MH95
 LB4w4UZiUwaqdl5tAl8oatqao1Y=; h=date:subject:to:from;
 d=ledu-giraud.fr; b=yyfp93H08YMVXjV+7ZKRppLZ7CssJd/1LgN+d3VF+n4FCxa2ih
 EH9X+dRgtuRQk3Lwg2oMiagV6lRobhHvxK+KFKwAdD+cE6SglLz3hiEXi6Bu+DlMXBgq2a
 utGzjoB52TkjOlLGOnQjmBUWbbJmxXjGl/iwjKv5g8+85pQTC/EJ1FvVIz2bOSO9OU8+HP
 fRdGgam+o7/BwQQAaN2dG5v4r2aXLZAZSRKkUKmZ5018AC3xisAUWr+hkAVUPKPfWcMyKw
 BiHlPpqUR/xVBDM6orrNuWECaWbdL04UKmzSi+bYjI0qlzGSDSIafXQiegniPwR84IS+5b
 HM0FyAFSsx0g==
Received: from computer (<unknown> [10.1.1.1])
 by ledu-giraud.fr (OpenSMTPD) with ESMTPSA id e6cd0b51
 (TLSv1.3:TLS_AES_256_GCM_SHA384:256:NO) for <bug-gnu-emacs@HIDDEN>;
 Mon, 15 Jul 2024 20:50:28 +0200 (CEST)
From: Manuel Giraud <manuel@HIDDEN>
To: bug-gnu-emacs@HIDDEN
Subject: 31.0.50; [PATCH] Remove `smtpmail-address-buffer'
X-Debbugs-Cc: 
Date: Mon, 15 Jul 2024 20:50:27 +0200
Message-ID: <875xt632x8.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13)
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
Received-SPF: pass client-ip=51.159.28.247; envelope-from=manuel@HIDDEN;
 helo=ledu-giraud.fr
X-Spam_score_int: -20
X-Spam_score: -2.1
X-Spam_bar: --
X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
 DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, SPF_HELO_PASS=-0.001,
 SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -1.4 (-)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.4 (--)

--=-=-=
Content-Type: text/plain


Hi
Hi,

I was reading "smtpmail.el".  Here is a simple patch that should not
change the functionality but, I think, is more idiomatic.


--=-=-=
Content-Type: text/x-patch
Content-Disposition: attachment;
 filename=0001-Remove-smtpmail-address-buffer-temporary-buffer.patch

From 093080f1483f6ab7473a2281a589f80f03573ecf Mon Sep 17 00:00:00 2001
From: Manuel Giraud <manuel@HIDDEN>
Date: Mon, 15 Jul 2024 17:33:21 +0200
Subject: [PATCH] Remove `smtpmail-address-buffer' temporary buffer

* lisp/mail/smtpmail.el (smtpmail-address-buffer): Remove var.
(smtpmail-send-it): Replace `smtpmail-address-buffer' with a
temporary buffer.
(smtpmail-deduce-address-list): Do not use
`smtpmail-address-buffer' anymore and
`smtpmail-recipient-address-list' is set by caller.
---
 lisp/mail/smtpmail.el | 97 +++++++++++++++++++++----------------------
 1 file changed, 47 insertions(+), 50 deletions(-)

diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index 98083c0489a..b3000194132 100644
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -182,7 +182,6 @@ smtpmail-store-queue-variables
 
 ;;; Variables
 
-(defvar smtpmail-address-buffer)
 (defvar smtpmail-recipient-address-list nil)
 (defvar smtpmail--stored-queue-variables
   '(smtpmail-smtp-server
@@ -357,11 +356,10 @@ smtpmail-send-it
 		  (erase-buffer))))
 	  ;; Encode the header according to RFC2047.
 	  (mail-encode-header (point-min) delimline)
-	  ;;
-	  (setq smtpmail-address-buffer (generate-new-buffer "*smtp-mail*"))
-	  (setq smtpmail-recipient-address-list
-                (smtpmail-deduce-address-list tembuf (point-min) delimline))
-	  (kill-buffer smtpmail-address-buffer)
+	  ;; Get recipients' adresses
+          (with-temp-buffer
+            (setq smtpmail-recipient-address-list
+                  (smtpmail-deduce-address-list tembuf (point-min) delimline)))
 
 	  (smtpmail-do-bcc delimline)
           ;; Send or queue
@@ -1068,51 +1066,50 @@ smtpmail-send-data
 
 (defun smtpmail-deduce-address-list (smtpmail-text-buffer header-start header-end)
   "Get address list suitable for smtp RCPT TO: <address>."
-  (with-current-buffer smtpmail-address-buffer
+  ;; Called into a temporary buffer.
+  (let ((case-fold-search t)
+        (simple-address-list "")
+        this-line
+        this-line-end
+        addr-regexp)
+    (insert-buffer-substring smtpmail-text-buffer header-start header-end)
+    (goto-char (point-min))
+    ;; RESENT-* fields should stop processing of regular fields.
+    (save-excursion
+      (setq addr-regexp
+	    (if (re-search-forward "^Resent-\\(To\\|Cc\\|Bcc\\):"
+				   header-end t)
+		"^Resent-\\(To\\|Cc\\|Bcc\\):"
+	      "^\\(To:\\|Cc:\\|Bcc:\\)")))
+
+    (while (re-search-forward addr-regexp header-end t)
+      (replace-match "")
+      (setq this-line (match-beginning 0))
+      (forward-line 1)
+      ;; get any continuation lines
+      (while (and (looking-at "^[ \t]+") (< (point) header-end))
+	(forward-line 1))
+      (setq this-line-end (point-marker))
+      (setq simple-address-list
+	    (concat simple-address-list " "
+		    (mail-strip-quoted-names (buffer-substring this-line this-line-end)))))
     (erase-buffer)
-    (let ((case-fold-search t)
-          (simple-address-list "")
-          this-line
-          this-line-end
-          addr-regexp)
-      (insert-buffer-substring smtpmail-text-buffer header-start header-end)
-      (goto-char (point-min))
-      ;; RESENT-* fields should stop processing of regular fields.
-      (save-excursion
-	(setq addr-regexp
-	      (if (re-search-forward "^Resent-\\(To\\|Cc\\|Bcc\\):"
-				     header-end t)
-		  "^Resent-\\(To\\|Cc\\|Bcc\\):"
-		"^\\(To:\\|Cc:\\|Bcc:\\)")))
-
-      (while (re-search-forward addr-regexp header-end t)
-	(replace-match "")
-	(setq this-line (match-beginning 0))
-	(forward-line 1)
-	;; get any continuation lines
-	(while (and (looking-at "^[ \t]+") (< (point) header-end))
-	  (forward-line 1))
-	(setq this-line-end (point-marker))
-	(setq simple-address-list
-	      (concat simple-address-list " "
-		      (mail-strip-quoted-names (buffer-substring this-line this-line-end)))))
-      (erase-buffer)
-      (insert " " simple-address-list "\n")
-      (subst-char-in-region (point-min) (point-max) 10 ?  t) ; newline --> blank
-      (subst-char-in-region (point-min) (point-max) ?, ?  t) ; comma   --> blank
-      (subst-char-in-region (point-min) (point-max)  9 ?  t) ; tab     --> blank
-
-      (goto-char (point-min))
-      ;; tidiness in case hook is not robust when it looks at this
-      (while (re-search-forward "[ \t]+" header-end t) (replace-match " "))
-
-      (goto-char (point-min))
-      (let (recipient-address-list)
-	(while (re-search-forward " \\([^ ]+\\) " (point-max) t)
-	  (backward-char 1)
-	  (setq recipient-address-list (cons (buffer-substring (match-beginning 1) (match-end 1))
-					     recipient-address-list)))
-	(setq smtpmail-recipient-address-list recipient-address-list)))))
+    (insert " " simple-address-list "\n")
+    (subst-char-in-region (point-min) (point-max) 10 ?  t) ; newline --> blank
+    (subst-char-in-region (point-min) (point-max) ?, ?  t) ; comma   --> blank
+    (subst-char-in-region (point-min) (point-max)  9 ?  t) ; tab     --> blank
+
+    (goto-char (point-min))
+    ;; tidiness in case hook is not robust when it looks at this
+    (while (re-search-forward "[ \t]+" header-end t) (replace-match " "))
+
+    (goto-char (point-min))
+    (let (recipient-address-list)
+      (while (re-search-forward " \\([^ ]+\\) " (point-max) t)
+	(backward-char 1)
+	(setq recipient-address-list (cons (buffer-substring (match-beginning 1) (match-end 1))
+					   recipient-address-list)))
+      recipient-address-list)))
 
 (defun smtpmail-do-bcc (header-end)
   "Delete [Resent-]Bcc: and their continuation lines from the header area.
-- 
2.45.2


--=-=-=
Content-Type: text/plain



In GNU Emacs 31.0.50 (build 18, x86_64-unknown-openbsd7.5) of 2024-07-15
 built on computer
Repository revision: 093080f1483f6ab7473a2281a589f80f03573ecf
Repository branch: mgi/temp-buffer
Windowing system distributor 'The X.Org Foundation', version 11.0.12101013
System Description: OpenBSD computer 7.5 GENERIC.MP#174 amd64

Configured using:
 'configure CC=egcc CPPFLAGS=-I/usr/local/include
 LDFLAGS=-L/usr/local/lib MAKEINFO=gmakeinfo --prefix=/home/manuel/emacs
 --bindir=/home/manuel/bin --with-x-toolkit=no --without-cairo
 --without-compress-install'

Configured features:
DBUS FREETYPE GIF GLIB GMP GNUTLS GSETTINGS HARFBUZZ JPEG LCMS2 LIBOTF
LIBXML2 MODULES NOTIFY KQUEUE OLDXMENU PDUMPER PNG RSVG SQLITE3 THREADS
TIFF TREE_SITTER WEBP X11 XDBE XFT XIM XINPUT2 XPM ZLIB

Important settings:
  value of $LC_CTYPE: en_US.UTF-8
  locale-coding-system: utf-8-unix

Major mode: Dired by name

Minor modes in effect:
  gnus-dired-mode: t
  display-time-mode: t
  display-battery-mode: t
  desktop-save-mode: t
  server-mode: t
  electric-pair-mode: t
  override-global-mode: t
  repeat-mode: t
  global-eldoc-mode: t
  show-paren-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  minibuffer-regexp-mode: t
  buffer-read-only: t
  line-number-mode: t
  indent-tabs-mode: t
  transient-mark-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t

Load-path shadows:
/home/manuel/.emacs.d/elpa/ef-themes-1.7.0/theme-loaddefs hides /home/manuel/emacs/share/emacs/31.0.50/lisp/theme-loaddefs

Features:
(shadow dabbrev emacsbug smerge-mode diff pcmpl-git vc-hg vc-bzr vc-src
vc-sccs vc-svn pulse tabify imenu man vc-annotate whitespace cl-print
help-fns radix-tree misearch multi-isearch flow-fill shr-color
gnus-async gnus-bcklg qp gnus-ml smtpmail textsec uni-scripts
idna-mapping ucs-normalize uni-confusable textsec-check sort mailalias
gnus-cite mail-extr gnus-topic mm-archive url-cache utf-7 imap rfc2104
nndoc nndraft nnmh network-stream nnfolder nnml gnus-agent gnus-srvr
gnus-score score-mode nnvirtual nntp gnus-cache nnrss vc-cvs vc-rcs
log-view pcvs-util org-indent org-agenda flymake-cc flymake warnings
oc-basic org-element org-persist org-id org-element-ast inline avl-tree
ol-eww eww url-queue mm-url ol-rmail ol-mhe ol-irc ol-info ol-gnus
nnselect ol-docview doc-view filenotify jka-compr image-mode exif
ol-bibtex bibtex ol-bbdb ol-w3m ol-doi org-link-doi gnus-icalendar
org-capture org-refile org ob ob-tangle ob-ref ob-lob ob-table ob-exp
org-macro org-src sh-script smie treesit executable ob-comint
org-pcomplete org-list org-footnote org-faces org-entities org-version
ob-emacs-lisp ob-core ob-eval org-cycle org-table ol org-fold
org-fold-core org-keys oc org-loaddefs org-compat org-macs texinfo
texinfo-loaddefs mule-util on-screen vc-dir ewoc vc make-mode gnus-dired
vc-git diff-mode track-changes vc-dispatcher bug-reference time battery
cus-load desktop frameset exwm-randr xcb-randr exwm-config ido exwm
exwm-input xcb-keysyms xcb-xkb exwm-manage exwm-floating xcb-cursor
xcb-render exwm-layout exwm-workspace exwm-core xcb-ewmh xcb-icccm xcb
xcb-xproto xcb-types xcb-debug server ef-kassio-theme ef-themes
modus-operandi-theme modus-themes zone speed-type url-http url-auth
url-gw nsm ytdious mpdired transmission color calc-bin calc-ext calc
calc-loaddefs rect calc-macs supercite regi ebdb-gnus gnus-msg gnus-art
mm-uu mml2015 mm-view mml-smime smime gnutls dig gnus-sum shr pixel-fill
kinsoku url-file svg dom gnus-group gnus-undo gnus-start gnus-dbus dbus
xml gnus-cloud nnimap nnmail mail-source utf7 nnoo gnus-spec gnus-int
gnus-range gnus-win ebdb-message message sendmail yank-media puny rfc822
mml mml-sec epa epg rfc6068 epg-config mm-decode mm-bodies mm-encode
mail-parse rfc2231 rfc2047 rfc2045 ietf-drums gmm-utils mailheader
ebdb-mua ebdb-com crm ebdb-format ebdb mailabbrev eieio-opt speedbar
ezimage dframe find-func eieio-base timezone icalendar gnus nnheader
gnus-util mail-utils range mm-util mail-prsvr wid-edit web-mode derived
disp-table erlang-start skeleton cc-mode cc-fonts cc-guess cc-menus
cc-cmds cc-styles cc-align cc-engine cc-vars cc-defs slime-asdf grep
slime-tramp tramp rx trampver tramp-integration files-x tramp-message
tramp-compat xdg shell pcomplete parse-time iso8601 time-date
format-spec tramp-loaddefs slime-fancy slime-indentation slime-cl-indent
cl-indent slime-trace-dialog slime-fontifying-fu slime-package-fu
slime-references slime-compiler-notes-tree advice slime-scratch
slime-presentations bridge slime-macrostep macrostep compat
slime-mdot-fu slime-enclosing-context slime-fuzzy slime-fancy-trace
slime-fancy-inspector slime-c-p-c slime-editing-commands slime-autodoc
slime-repl slime-parse slime apropos compile text-property-search etags
fileloop generator xref project arc-mode archive-mode noutline outline
pp comint ansi-osc ansi-color ring hyperspec thingatpt elec-pair edmacro
kmacro use-package-bind-key bind-key appt diary-lib diary-loaddefs
cal-menu calendar cal-loaddefs pcase dired-x dired-aux dired
dired-loaddefs use-package-core repeat easy-mmode calfw-autoloads
calfw-cal-autoloads calfw-org-autoloads debbugs-autoloads ebdb-autoloads
cl-extra help-mode ef-themes-autoloads exwm-autoloads
hyperbole-autoloads kotl-autoloads hact set hhist on-screen-autoloads
osm-autoloads rust-mode-autoloads info slime-autoloads
macrostep-autoloads speed-type-autoloads transmission-autoloads
xelb-autoloads ytdious-autoloads package browse-url url url-proxy
url-privacy url-expand url-methods url-history url-cookie
generate-lisp-file url-domsuf url-util mailcap url-handlers url-parse
auth-source cl-seq eieio eieio-core cl-macs icons password-cache json
subr-x map byte-opt gv bytecomp byte-compile url-vars cl-loaddefs cl-lib
rmc iso-transl tooltip cconv eldoc paren electric uniquify ediff-hook
vc-hooks lisp-float-type elisp-mode mwheel term/x-win x-win
term/common-win x-dnd touch-screen tool-bar dnd fontset image regexp-opt
fringe tabulated-list replace newcomment text-mode lisp-mode prog-mode
register page tab-bar menu-bar rfn-eshadow isearch easymenu timer select
scroll-bar mouse jit-lock font-lock syntax font-core term/tty-colors
frame minibuffer nadvice seq simple cl-generic indonesian philippine
cham georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao
korean japanese eucjp-ms cp51932 hebrew greek romanian slovak czech
european ethiopic indian cyrillic chinese composite emoji-zwj charscript
charprop case-table epa-hook jka-cmpr-hook help abbrev obarray oclosure
cl-preloaded button loaddefs theme-loaddefs faces cus-face macroexp
files window text-properties overlay sha1 md5 base64 format env
code-pages mule custom widget keymap hashtable-print-readable backquote
threads dbusbind kqueue lcms2 dynamic-setting system-font-setting
font-render-setting xinput2 x multi-tty move-toolbar
make-network-process emacs)

Memory information:
((conses 16 1048160 412645) (symbols 48 56163 25)
 (strings 32 275019 15389) (string-bytes 1 8635244)
 (vectors 16 179701) (vector-slots 8 2505106 82515)
 (floats 8 700 3959) (intervals 56 19876 4088) (buffers 992 116))

-- 
Manuel Giraud

--=-=-=--




Acknowledgement sent to Manuel Giraud <manuel@HIDDEN>:
New bug report received and forwarded. Copy sent to bug-gnu-emacs@HIDDEN. Full text available.
Report forwarded to bug-gnu-emacs@HIDDEN:
bug#72128; Package emacs. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Thu, 13 Feb 2025 13:30:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.