                  :dyn-target (lambda (target msg) (mu4e-get-refile-folder msg))
                  :action
                  (lambda (docid msg target)
-                   (mu4e~proc-move docid (mu4e~mark-check-target target) "+S-u-N")))
+                   (mu4e~proc-move docid (mu4e~mark-check-target target) "-u-N")))
         mu4e-marks)
 
   ;; This hook correctly modifies the \Inbox and \Starred flags on email when

(def-package! evil-mu4e
  :after mu4e
  :when (featurep! :feature evil)
  :init (defvar evil-mu4e-state 'normal)
  :config
  (defun +email|headers-keybinds ()
    (map! :Ln "-"   #'mu4e-headers-mark-for-unflag
          :Ln "+"   #'mu4e-headers-mark-for-flag
          :Ln "v"   #'evil-visual-line
          :Ln "q"   #'mu4e~headers-quit-buffer
          ;; Enable multiple markings via visual mode
          :Lv "d"   #'+email/mark-multiple
          :Lv "-"   #'+email/mark-multiple
          :Lv "+"   #'+email/mark-multiple

          (:from . 25)
          (:subject)))

  (let ((inbox-query (mapconcat (lambda (arg) (format " maildir:/%s/Inbox " arg))
                                (mapcar #'car +email--accounts) " OR ")))
    (setq mu4e-bookmarks `((,inbox-query "Inbox" ?i)
                           (,(format "flag:unread AND (%s)" inbox-query)
                            "Unread messages" ?u)
                           ("flag:flagged" "Starred messages" ?s)
                           ("date:today..now" "Today's messages" ?t)
                           ("date:7d..now" "Last 7 days" ?w)
                           ("mime:image/*" "Messages with images" ?p))))

  (push '(:account
          :name "Account"
