diff --git a/.emacs.d/init.el b/.emacs.d/init.el index b245396..3c06f6f 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -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))