]> git.notmuchmail.org Git - notmuch/blobdiff - emacs/notmuch-maildir-fcc.el
emacs: deal with unused lexical arguments and variables
[notmuch] / emacs / notmuch-maildir-fcc.el
index e880653cfa5871e1e6fb6eb3860f9a13ea0aacb0..9f09129defa7892e93e29bcdc02bab3ecafce512 100644 (file)
@@ -346,12 +346,12 @@ return t if successful, and nil otherwise."
        (let ((msg-id (notmuch-maildir-fcc-save-buffer-to-tmp destdir)))
          (when msg-id
            (cond (mark-seen
-                  (condition-case err
+                  (condition-case nil
                       (notmuch-maildir-fcc-move-tmp-to-cur destdir msg-id t)
                     (file-already-exists
                      (throw 'link-error nil))))
                  (t
-                  (condition-case err
+                  (condition-case nil
                       (notmuch-maildir-fcc-move-tmp-to-new destdir msg-id)
                     (file-already-exists
                      (throw 'link-error nil))))))