Add nm-update-remote function

pretty slow, probably need to change later
also, mbsync at end too? maybe async?
This commit is contained in:
Adam Goldsmith 2018-01-28 03:15:15 -05:00
parent df377702be
commit aee1ecab8a
1 changed files with 8 additions and 2 deletions

View File

@ -605,14 +605,20 @@
(add-hook 'js2-mode-hook (lambda () (tern-mode t))))
(use-package nm
:bind (:map nm-mode-map ("N" . nm-read))
:bind (:map nm-mode-map
("n" . nm-read)
("G" . nm-update-remote))
:config
(defun nm-read ()
"Mark message as read."
(interactive)
(nm-apply-to-result (lambda (q) (notmuch-tag q '("-unread"))))
(nm-update-tags)
(forward-line)))
(forward-line))
(defun nm-update-remote ()
"Pull email from remote mailbox"
(interactive)
(shell-command "ssh ag 'mbsync inboxes && afew -tn' && muchsync ag")))
;;; Local Variables
(add-to-list 'safe-local-eval-forms '(outline-hide-body))