From mboxrd@z Thu Jan  1 00:00:00 1970
Received: from mail.cmpwn.com ([45.56.77.53]) by ewsd; Sun Feb 16 18:34:24 EST 2020
DKIM-Signature: v=1; a=rsa-sha256; c=simple/simple; d=cmpwn.com; s=cmpwn;
	t=1581896063; bh=3vlSMrta/Li4ehs366OX0Xh3x8I1Cb97uURm5FXAcYQ=;
	h=From:Date:To:Subject;
	b=tFDUpl9i77cYK9vKD29yEeiZXVZBdmRYwl5/jyQTJ4aYvm6F5fWorVb/tWHpgweFN
	 X9ayfEK8GZyvtWzRd+2OHAw9L6VICwQ+JKfxoSgw4MXEe67nEam+KB/twGw/75G9bd
	 R4zNdn8o64lELj4CGoLnL2SGmpmMtkE7fOc2BE2A=
Message-ID: <C67912AA9F52283CD5C3A0C19F516C8B@cmpwn.com>
From: Drew DeVault <sir@cmpwn.com>
Date: Sun, 16 Feb 2020 18:34:22 -0500
To: 9front@9front.org, sir@cmpwn.com
Subject: [PATCH] upas/Mail: add In-Reply-To to replies
MIME-Version: 1.0
Content-Type: text/plain; charset="US-ASCII"
Content-Transfer-Encoding: 7bit
List-ID: <9front.9front.org>
List-Help: <http://lists.9front.org>
X-Glyph: ➈
X-Bullshit: realtime template metadata 

# HG changeset patch
# User Drew DeVault <sir@cmpwn.com>
# Date 1581895466 18000
# Node ID 5142c37315c57642b747aae1b16b8562d5482d21
# Parent  1d345066125a340bfae117459393f4167700096c
upas/Mail: add In-Reply-To to replies

diff -r 1d345066125a -r 5142c37315c5 sys/src/cmd/upas/Mail/dat.h
--- a/sys/src/cmd/upas/Mail/dat.h	Fri Oct 04 18:54:01 2019 +0200
+++ b/sys/src/cmd/upas/Mail/dat.h	Sun Feb 16 18:24:26 2020 -0500
@@ -70,6 +70,7 @@
 	char		*disposition;
 	char		*filename;
 	char		*digest;
+	char		*messageid;
 
 	Message	*next;	/* next in this mailbox */
 	Message	*prev;	/* prev in this mailbox */
diff -r 1d345066125a -r 5142c37315c5 sys/src/cmd/upas/Mail/mesg.c
--- a/sys/src/cmd/upas/Mail/mesg.c	Fri Oct 04 18:54:01 2019 +0200
+++ b/sys/src/cmd/upas/Mail/mesg.c	Sun Feb 16 18:24:26 2020 -0500
@@ -129,7 +129,7 @@
 	/* m->inreplyto = */ free(line(p, &p));
 	/* m->date = */ free(line(p, &p));
 	/* m->sender = */ free(line(p, &p));
-	/* m->messageid = */ free(line(p, &p));
+	m->messageid = line(p, &p);
 	/* m->lines = */ free(line(p, &p));
 	/* m->size = */ free(line(p, &p));
 	/* m->flags = */ free(line(p, &p));
diff -r 1d345066125a -r 5142c37315c5 sys/src/cmd/upas/Mail/reply.c
--- a/sys/src/cmd/upas/Mail/reply.c	Fri Oct 04 18:54:01 2019 +0200
+++ b/sys/src/cmd/upas/Mail/reply.c	Sun Feb 16 18:24:26 2020 -0500
@@ -115,6 +115,8 @@
 					Bprint(r->w->body, "CC: %s\n", m->cc);
 			}
 		}
+		if(strlen(m->messageid) > 0)
+			Bprint(r->w->body, "In-Reply-To: %s\n", m->messageid);
 		if(strlen(m->subject) > 0){
 			t = "Subject: Re: ";
 			if(strlen(m->subject) >= 3)