diff options
Diffstat (limited to 'emacs/notmuch-message.el')
-rw-r--r-- | emacs/notmuch-message.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/emacs/notmuch-message.el b/emacs/notmuch-message.el index aefd3fbc..08e5b174 100644 --- a/emacs/notmuch-message.el +++ b/emacs/notmuch-message.el @@ -39,10 +39,10 @@ the \"inbox\" and \"todo\", you would set (when (and notmuch-message-replied-tags rep) ;; add a "+" to any tag that is doesn't already begin with a "+" ;; or "-" - (let ((tags (mapcar '(lambda (str) - (if (not (string-match "^[+-]" str)) - (concat "+" str) - str)) + (let ((tags (mapcar (lambda (str) + (if (not (string-match "^[+-]" str)) + (concat "+" str) + str)) notmuch-message-replied-tags))) (apply 'notmuch-tag (concat "id:" (car (car rep))) tags))))) |