diff options
author | Raul Benencia <id@rbenencia.name> | 2023-02-12 14:56:00 -0800 |
---|---|---|
committer | Raul Benencia <id@rbenencia.name> | 2023-02-12 15:22:37 -0800 |
commit | f6a1ec5f84ed246205c55d55092b2140a27f245b (patch) | |
tree | 6655a35012ef81be1b8e2941202907e2cfb84f3c /.emacs.local.d/modes/notmuch.el | |
parent | c0afd2e92baf0729910f1f60065c7cd29f19226f (diff) |
emacs: auto-load config files
Diffstat (limited to '.emacs.local.d/modes/notmuch.el')
-rw-r--r-- | .emacs.local.d/modes/notmuch.el | 32 |
1 files changed, 1 insertions, 31 deletions
diff --git a/.emacs.local.d/modes/notmuch.el b/.emacs.local.d/modes/notmuch.el index f4ed127..5a5c9a9 100644 --- a/.emacs.local.d/modes/notmuch.el +++ b/.emacs.local.d/modes/notmuch.el @@ -2,37 +2,7 @@ ;; notmuch mode ;; -------- (require 'notmuch) - -;; This should be upstream -(require 'notmuch-show) -(require 'notmuch-tag) -(defun notmuch-tree-show-message-in () - "Show the current message (in split-pane)." - (interactive) - (let ((id (notmuch-tree-get-message-id)) - (inhibit-read-only t) - buffer) - (when id - ;; We close and reopen the window to kill off un-needed buffers - ;; this might cause flickering but seems ok. - (notmuch-tree-close-message-window) - (setq notmuch-tree-message-window - (split-window-vertically (/ (window-height) 4))) - (with-selected-window notmuch-tree-message-window - ;; Since we are only displaying one message do not indent. - (let ((notmuch-show-indent-messages-width 0) - (notmuch-show-only-matching-messages t)) - (setq buffer (notmuch-show id)))) - ;; We need the `let' as notmuch-tree-message-window is buffer local. - (let ((window notmuch-tree-message-window)) - (with-current-buffer buffer - (setq notmuch-tree-message-window window) - (add-hook 'kill-buffer-hook 'notmuch-tree-message-window-kill-hook))) - (when notmuch-show-mark-read-tags - (notmuch-tree-tag-update-display notmuch-show-mark-read-tags) - (notmuch-tree-tag notmuch-show-mark-read-tags)) - (setq notmuch-tree-message-buffer buffer)))) -;; End upstream +(require 'rul-config-mail) ;; Keymaps (defun rul/capture-mail() |