From f8fed3d666fb9b514a7d33bd869b64446cf2f1ed Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 5 Jun 2021 17:13:54 -0400 Subject: piem-lei-query-thread: Deal with multiple "re:"s piem-lei-query-thread strips a message's subject of "re: " before checking matches the previous line's subject and should be dropped. "re: re: " unfortunately don't seem uncommon, so strip multiple "re:"s. Message-Id: <20210605211402.20304-11-kyle@kyleam.com> --- piem-lei.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/piem-lei.el b/piem-lei.el index 43ab01e..cf19195 100644 --- a/piem-lei.el +++ b/piem-lei.el @@ -387,7 +387,8 @@ Return a list with a `piem-lei-msg' object for each root." (let* ((data (cdr (assoc mid-msg records))) (subject (let ((case-fold-search t)) (replace-regexp-in-string - (rx string-start "re:" (one-or-more space)) + (rx string-start + (one-or-more "re:" (one-or-more space))) "" (string-trim (cdr (assq 's data))))))) (insert -- cgit v1.2.3