From 6b89f4abae0a4606a2fbbd4bf71d82c9dd3f52c6 Mon Sep 17 00:00:00 2001
From: "Dirk-Jan C. Binnema" <djcb@djcbsoftware.nl>
Date: Fri, 22 Aug 2025 08:13:55 +0300
Subject: [PATCH] scm: message_parts: use cons instead of append

It's faster.
---
 scm/mu-scm-message.cc | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/scm/mu-scm-message.cc b/scm/mu-scm-message.cc
index 7c54bed3..c60ef8b0 100644
--- a/scm/mu-scm-message.cc
+++ b/scm/mu-scm-message.cc
@@ -171,14 +171,13 @@ subr_cc_message_parts(SCM message_scm) try {
 		auto mime_part{GMIME_PART(part.mime_object().object())};
 		SCM mime_part_scm{to_scm(mime_part)};
 		SCM alist_scm{to_scm(idx, parts[idx])};
+		SCM item{scm_cons(mime_part_scm, alist_scm)};
 
-		parts_scm = scm_append_x(
-			scm_list_2(parts_scm,
-				   scm_list_1(
-					   scm_cons(mime_part_scm, alist_scm))));
+		parts_scm = scm_cons(item, parts_scm);
 	}
 
-	return parts_scm;
+	return scm_reverse_x(parts_scm, SCM_EOL);
+
 
 } catch (const ScmError& err) {
 	err.throw_scm();