From 31c1da1f0722ab0b85d022062f8e5eb46564f920 Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 3 Mar 2022 05:55:45 +0000 Subject: whitespace --- gnus.org | 66 ++++++++++++++++++++++++++++++---------------------------------- 1 file changed, 31 insertions(+), 35 deletions(-) (limited to 'gnus.org') diff --git a/gnus.org b/gnus.org index 1a5a9ea..558b98e 100644 --- a/gnus.org +++ b/gnus.org @@ -377,40 +377,6 @@ (eval-after-load "message" '(setq message-draft-headers (remove 'Date message-draft-headers))) #+END_SRC -* Notmuch integration -*** notmuch tags - #+begin_src emacs-lisp - (require 'jao-notmuch-gnus) - - (defun jao-gnus-toggle-todo () - (interactive) - (jao-notmuch-gnus-toggle-tags '("todo"))) - - (define-key gnus-summary-mode-map (kbd "C-c T") #'jao-notmuch-gnus-tag-message) - (define-key gnus-summary-mode-map (kbd "C-c t") #'jao-notmuch-gnus-show-tags) - (define-key gnus-summary-mode-map (kbd "C-c C-t") #'jao-gnus-toggle-todo) - - #+end_src -*** notmuch -> gnus / consult-notmuch - #+begin_src emacs-lisp - (with-eval-after-load "notmuch-show" - (define-key gnus-group-mode-map "z" #'jao-gnus-consult-notmuch) - (define-key gnus-group-mode-map "Z" #'notmuch) - (define-key notmuch-show-mode-map - (kbd "C-c C-c") - #'jao-notmuch-gnus-goto-message)) - - (defun jao-gnus-notmuch-export (query) - (notmuch-tree query nil nil "* consult-notmuch results *")) - - (setq consult-notmuch-export-function #'jao-gnus-notmuch-export) - - (with-eval-after-load "notmuch-tree" - (define-key notmuch-tree-mode-map - (kbd "C-") - #'jao-notmuch-gnus-goto-message)) - - #+end_src * Groups buffer #+begin_src emacs-lisp ;; (setq gnus-group-line-format " %m%S%p%P:%~(pad-right 35)c %3y %B\n") @@ -726,7 +692,37 @@ (jao-browse-add-url-to-mpc url)))))) #+end_src * Add-ons -*** icalendar/org +*** notmuch integration + #+begin_src emacs-lisp + (require 'jao-notmuch-gnus) + + (defun jao-gnus-toggle-todo () + (interactive) + (jao-notmuch-gnus-toggle-tags '("todo"))) + + (define-key gnus-summary-mode-map (kbd "C-c T") #'jao-notmuch-gnus-tag-message) + (define-key gnus-summary-mode-map (kbd "C-c t") #'jao-notmuch-gnus-show-tags) + (define-key gnus-summary-mode-map (kbd "C-c C-t") #'jao-gnus-toggle-todo) + + (with-eval-after-load "notmuch-show" + (define-key gnus-group-mode-map "z" #'jao-gnus-consult-notmuch) + (define-key gnus-group-mode-map "Z" #'notmuch) + (define-key notmuch-show-mode-map + (kbd "C-c C-c") + #'jao-notmuch-gnus-goto-message)) + + (defun jao-gnus-notmuch-export (query) + (notmuch-tree query nil nil "* consult-notmuch results *")) + + (setq consult-notmuch-export-function #'jao-gnus-notmuch-export) + + (with-eval-after-load "notmuch-tree" + (define-key notmuch-tree-mode-map + (kbd "C-") + #'jao-notmuch-gnus-goto-message)) + + #+end_src +*** gnus-icalendar #+begin_src emacs-lisp (require 'ol-gnus) (use-package gnus-icalendar -- cgit v1.2.3