[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master d3560e0 1/4: rmail-dont-reply-to-names is obsolete
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master d3560e0 1/4: rmail-dont-reply-to-names is obsolete |
Date: |
Fri, 12 Feb 2016 06:33:18 +0000 |
branch: master
commit d3560e0af4d27e423a2acd7c6a40a47305255a34
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
rmail-dont-reply-to-names is obsolete
* lisp/gnus/nnmail.el (nnmail-fancy-expiry-target): Don't bind
the obsolete `rmail-dont-reply-to-names' variable.
---
lisp/gnus/nnmail.el | 6 ++----
1 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/lisp/gnus/nnmail.el b/lisp/gnus/nnmail.el
index ae322b7..b8899f4 100644
--- a/lisp/gnus/nnmail.el
+++ b/lisp/gnus/nnmail.el
@@ -1950,10 +1950,8 @@ If TIME is nil, then return the cutoff time for oldness
instead."
((and (equal header 'to-from)
(or (string-match (cadr regexp-target-pair) from)
(and (string-match (cadr regexp-target-pair) to)
- (let* ((mail-dont-reply-to-names
- (message-dont-reply-to-names))
- (rmail-dont-reply-to-names ; obsolete since 24.1
- mail-dont-reply-to-names))
+ (let ((mail-dont-reply-to-names
+ (message-dont-reply-to-names)))
(equal (if (fboundp 'rmail-dont-reply-to)
(rmail-dont-reply-to from)
(mail-dont-reply-to from)) "")))))