aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2021-09-22 21:23:53 -0400
committerKyle Meyer <kyle@kyleam.com>2021-09-22 22:36:18 -0400
commit0ce70c3c72211106be19d48edc286a58721a8e03 (patch)
treef54001b473e7a3125f06a509d2873f095eb65f5a
parentc901d3ec025773c8eae04257099fcdfe704085ac (diff)
downloadpiem-0ce70c3c72211106be19d48edc286a58721a8e03.tar.gz
Prefer mail-decode-encoded-word-string to rfc2047-decode-string
mail-parse.el defines mail-decode-encoded-word-string as an alias for rfc2047-decode-string. Use the higher-level wrapper for the reasons described in (emacs-mime)Interface. Message-Id: <20210923012353.256964-1-kyle@kyleam.com>
-rw-r--r--piem-gnus.el4
-rw-r--r--piem.el4
2 files changed, 4 insertions, 4 deletions
diff --git a/piem-gnus.el b/piem-gnus.el
index 3fb8c7d..98e67c9 100644
--- a/piem-gnus.el
+++ b/piem-gnus.el
@@ -30,9 +30,9 @@
(require 'gnus)
(require 'gnus-art)
(require 'gnus-sum)
+(require 'mail-parse)
(require 'message)
(require 'piem)
-(require 'rfc2047)
(defgroup piem-gnus nil
"Gnus integration for piem."
@@ -109,7 +109,7 @@ message itself if it looks like a patch."
(widen)
(and (string-match-p
piem-patch-subject-re
- (rfc2047-decode-string
+ (mail-decode-encoded-word-string
(message-field-value "subject")))
(buffer-substring-no-properties
(point-min) (point-max)))))))
diff --git a/piem.el b/piem.el
index 0c5f9cf..16ccdfc 100644
--- a/piem.el
+++ b/piem.el
@@ -40,10 +40,10 @@
(require 'browse-url)
(require 'cl-lib)
(require 'mail-extr)
+(require 'mail-parse)
(require 'message)
(require 'mm-decode)
(require 'piem-maildir)
-(require 'rfc2047)
(require 'subr-x)
(require 'transient)
(require 'url)
@@ -472,7 +472,7 @@ non-nil, make the match specific for that message."
(message-narrow-to-head)
(mapcar (lambda (header)
(when-let ((val (message-fetch-field header)))
- (rfc2047-decode-string val)))
+ (mail-decode-encoded-word-string val)))
headers))))
(defun piem-inbox-by-header-match ()