diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 585758b..b245396 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -604,6 +604,16 @@
   (setq company-tern-property-marker "⚫")
   (add-hook 'js2-mode-hook (lambda () (tern-mode t))))
 
+(use-package nm
+  :bind (:map nm-mode-map ("N"  . nm-read))
+  :config
+  (defun nm-read ()
+    "Mark message as read."
+    (interactive)
+    (nm-apply-to-result (lambda (q) (notmuch-tag q '("-unread"))))
+    (nm-update-tags)
+    (forward-line)))
+
 ;;; Local Variables
 (add-to-list 'safe-local-eval-forms '(outline-hide-body))
 ;; Local Variables: