(feedmail-deduce-address-list): Avoid add-to-list on local variables.

Author:

* lisp/mail/feedmail.el (feedmail-deduce-address-list):
Avoid add-to-list on local variables.

1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el
index eed664d088e..1402db40951 100644
--- a/lisp/mail/feedmail.el
+++ b/lisp/mail/feedmail.el
@@ -3147,7 +3147,7 @@ been weeded out."
                 (setq simple-address (substring address-blob (match-beginning 2) (match-end 2)))
                 (setq address-blob (replace-match "" t t address-blob))
                 (if (not (member simple-address address-list))
-                    (add-to-list 'address-list simple-address)))
+                    (push simple-address address-list)))
               ))
           (kill-buffer nil)))
     (identity address-list)))