]> git.notmuchmail.org Git - notmuch/blobdiff - emacs/notmuch-mua.el
emacs: fix old bug in notmuch-mua-mail
[notmuch] / emacs / notmuch-mua.el
index 616b625ca979d5787cfeb610462febc80908fab1..1204fb6ac3de2059fe9b8e21f68fc6d144f4a9a9 100644 (file)
@@ -402,7 +402,7 @@ modified. This function is notmuch adaptation of
     ;; argument. Pass it only if it is supplied by the caller. This
     ;; will never be the case when we're called by `compose-mail' in
     ;; Emacs 23.
-    (when return-action (nconc args '(return-action)))
+    (when return-action (nconc args (list return-action)))
     (apply 'message-setup-1 headers args))
   (notmuch-fcc-header-setup)
   (message-sort-headers)