Add a fast remote update function to nm

This commit is contained in:
Adam Goldsmith 2019-11-24 09:59:43 -05:00
parent 63be82b791
commit e47c2cd2f5

View File

@ -785,7 +785,9 @@
:bind (:map nm-mode-map
("n" . nm-read)
("s" . nm-spam)
("G" . nm-update-remote)
("G" . nm-update-remote-fast)
("C-G" . nm-update-remote)
("M-g" . nm-reset)
("j" . next-line)
("k" . previous-line)
("N" . nm-sticky-tag-and-next))
@ -833,6 +835,11 @@
(interactive)
(shell-command "muchsync --upbg ag")
(nm-refresh))
(defun nm-update-remote-fast ()
"Pull email from remote mailbox"
(interactive)
(shell-command "muchsync --upbg ag --nonew")
(nm-refresh))
(defvar nm-sticky-tags nil)
(defun nm-sticky-tag-and-next (tags)
(interactive