X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-address.el;h=2bf762ba9b1a0ae3a3970cf2ac2dfdc4ef4071f1;hb=ab2f9fd828058d281480e9947ea346e382a7f3c8;hp=2e8b8402f2c29fa8580adabc92aec61438bcddf4;hpb=643ce61c1babf6e73ca7e03fb907282e7ee3b176;p=notmuch diff --git a/emacs/notmuch-address.el b/emacs/notmuch-address.el index 2e8b8402..2bf762ba 100644 --- a/emacs/notmuch-address.el +++ b/emacs/notmuch-address.el @@ -38,9 +38,9 @@ line." (defvar notmuch-address-history nil) (defun notmuch-address-message-insinuate () - (if (not (memq notmuch-address-message-alist-member message-completion-alist)) - (setq message-completion-alist - (push notmuch-address-message-alist-member message-completion-alist)))) + (unless (memq notmuch-address-message-alist-member message-completion-alist) + (setq message-completion-alist + (push notmuch-address-message-alist-member message-completion-alist)))) (defun notmuch-address-options (original) (process-lines notmuch-address-command original))