From e203e26a38b536afb8021dce319e5203a94dfc0c Mon Sep 17 00:00:00 2001
From: "Dirk-Jan C. Binnema" <djcb@djcbsoftware.nl>
Date: Wed, 8 Jan 2020 11:49:08 +0200
Subject: [PATCH] mu-sexp: improve list-post regexp

Support more addresses.
---
 lib/mu-msg-sexp.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/mu-msg-sexp.c b/lib/mu-msg-sexp.c
index 57b9700e..0d1ab466 100644
--- a/lib/mu-msg-sexp.c
+++ b/lib/mu-msg-sexp.c
@@ -177,12 +177,12 @@ maybe_append_list_post (GString *gstr, MuMsg *msg)
 	if (!list_post)
 		return;
 
-	rx = g_regex_new ("^(<?mailto:)?([a-z0-9%+@._-]+)>?", G_REGEX_CASELESS, 0, NULL);
+	rx = g_regex_new ("<?mailto:([a-z0-9%+@._-]+)>?", G_REGEX_CASELESS, 0, NULL);
 	g_return_if_fail(rx);
 
 	if (g_regex_match (rx, list_post, 0, &minfo)) {
 		char	*addr;
-		addr = g_match_info_fetch (minfo, 2);
+		addr = g_match_info_fetch (minfo, 1);
 		g_string_append_printf (gstr,"\t:list-post ((nil . \"%s\"))\n", addr);
 		g_free(addr);
 	}