---

My integration with Org

Link threads from Org.

• Store

  (with-eval-after-load 'org
    (defun my-org-notmuch-search-store-link ()
      "Store a link to a Notmuch thread."
      (interactive)
      (when (eq major-mode 'notmuch-search-mode)
        (org-store-link-props
         :type "notmuch"
         :link (concat "notmuch-search:" (notmuch-search-find-thread-id t))
         :description (notmuch-search-find-subject)))))
  

• Follow

  (with-eval-after-load 'org
    (defun my-org-notmuch-search-follow-link (path)
      (notmuch-search (concat "thread:" path))))
  

• Register

  (with-eval-after-load 'org
    (org-link-set-parameters
     "notmuch-search"
     :store #'my-org-notmuch-search-store-link
     :follow #'my-org-notmuch-search-follow-link))