Refactored complicated literate with noweb refs

This allows me not to worry about order when code is tangled, and
instead allows the code to "pull" in named code blocks inside the
`use-package` calls.
This commit is contained in:
Howard Abrams 2021-11-18 09:40:12 -08:00
parent 7301b8fb0e
commit b205f0199d
2 changed files with 18 additions and 17 deletions

View file

@ -49,7 +49,7 @@ brew install notmuch
Next, we need some basic configuration settings and some global keybindings:
#+BEGIN_SRC emacs-lisp
#+BEGIN_SRC emacs-lisp :noweb yes
(use-package notmuch
:init
(setq mail-user-agent 'notmuch-user-agent
@ -67,10 +67,14 @@ Next, we need some basic configuration settings and some global keybindings:
:bind (:map notmuch-hello-mode-map
("U" . notmuch-retrieve-messages) ; Defined later
("C" . notmuch-mua-new-mail))
(:map notmuch-tree-mode-map
("C" . notmuch-mua-new-mail))
:config (ha-leader ; Should I put these under an "m" heading?
"a n" '("new mail" . notmuch-retrieve-messages)
"a m" '("read mail" . notmuch)
"a c" '("compose mail" . notmuch-mua-new-mail)))
"a c" '("compose mail" . notmuch-mua-new-mail))
<<hey-show-keybindings>>
<<hey-search-keybindings>>)
#+END_SRC
Also, let's do some basic configuration of Emacs' mail system:
#+BEGIN_SRC emacs-lisp
@ -592,21 +596,17 @@ This means:
#+END_SRC
** Bucket Keybindings
The bindings in =notmuch-tree-mode= make composing a new mail at the top-level easy:
#+BEGIN_SRC emacs-lisp
(define-key notmuch-tree-mode-map (kbd "C") 'hey-notmuch-reply-later)
#+END_SRC
A series of keybindings to quickly send messages to one of the pre-defined buckets. The =notmuch-show-mode= is the ... uhm
#+BEGIN_SRC emacs-lisp
#+NAME: hey-show-keybindings
#+BEGIN_SRC emacs-lisp :tangle no
(define-key notmuch-show-mode-map (kbd "C") 'hey-notmuch-reply-later)
#+END_SRC
The bindings in =notmuch-search-mode= are available when looking at a list of messages:
#+BEGIN_SRC emacs-lisp
#+NAME: hey-search-keybindings
#+BEGIN_SRC emacs-lisp :tangle no
(define-key notmuch-search-mode-map (kbd "r") 'notmuch-search-reply-to-thread)
(define-key notmuch-search-mode-map (kbd "R") 'notmuch-search-reply-to-thread-sender)
(define-key notmuch-search-mode-map (kbd "/") 'notmuch-search-filter)
@ -657,7 +657,7 @@ A new option is to use [[https://github.com/jeremy-compostella/org-msg][org-msg]
#+END_SRC
The idea of linking org documents to email could be nice, however, the =ol-notmuch= package in the [[https://elpa.nongnu.org/nongnu/org-contrib.html][org-contrib]] package needs a maintainer.
#+BEGIN_SRC emacs-lisp
#+BEGIN_SRC emacs-lisp :tangle no
(use-package ol-notmuch
:after org
:straight (:type built-in)

View file

@ -42,8 +42,7 @@ Org is a /large/ complex beast with a gazillion settings, so I discuss these lat
<<ob-languages>>
<<org-return-key>>
<<global-keybindings>>
<<org-keybindings>>
<<ace-keybindings>>)
<<org-keybindings>>)
#+END_SRC
* Initialization Section
Org is an important part of my Emacs world, and with a lot of customization (even though Spacemacs and Doom do a good job getting things started).
@ -330,10 +329,12 @@ Bindings specific to org files:
#+END_SRC
Oh, and we'll use [[https://github.com/abo-abo/ace-link][ace-link]] for quickly jumping:
#+NAME: ace-keybindings
#+BEGIN_SRC emacs-lisp :tangle no
#+BEGIN_SRC emacs-lisp
(use-package ace-link
(define-key org-mode-map (kbd "M-o") 'ace-link-org))
:after org
:config
(define-key org-mode-map (kbd "s-o") 'ace-link-org))
#+END_SRC
* Supporting Packages
** Exporters