From 0bda2f1dabd6b044a73443a72beea1ae546dcff5 Mon Sep 17 00:00:00 2001 From: Howard Abrams Date: Thu, 12 Oct 2023 20:59:53 -0700 Subject: [PATCH] fix the mail --- ha-display.org | 2 +- ha-email.org | 20 ++++++++++++-------- 2 files changed, 13 insertions(+), 9 deletions(-) diff --git a/ha-display.org b/ha-display.org index eb0b70e..391e436 100644 --- a/ha-display.org +++ b/ha-display.org @@ -281,7 +281,7 @@ Define /interactive/ functions to quickly adjusting the font size based on my co (defun ha-linux-laptop-fontsize () "Quickly set reset my font size when I disconnect my laptop to a monitor from Linux." (interactive) - (ha-set-favorite-font-size 14)) + (ha-set-favorite-font-size 10)) (defun ha-imac-fontsize () "Quickly set reset my font size when I am on my iMac." diff --git a/ha-email.org b/ha-email.org index 70d9a48..8806338 100644 --- a/ha-email.org +++ b/ha-email.org @@ -94,8 +94,11 @@ Next, we need some basic configuration settings and some global keybindings: ("U" . notmuch-retrieve-messages) ("C" . notmuch-mua-new-mail) :map notmuch-tree-mode-map - ("C" . notmuch-mua-new-mail)) - + ("C" . notmuch-mua-new-mail))) +#+end_src +And some leader-based keybindings: +#+begin_src emacs-lisp :noweb yes + (use-package notmuch :config (ha-leader ; Should I put these under an "m" heading? "a n" '("new mail" . notmuch-retrieve-messages) @@ -110,6 +113,7 @@ Next, we need some basic configuration settings and some global keybindings: <> <>) + #+end_src Also, let's do some basic configuration of Emacs' mail system: #+begin_src emacs-lisp @@ -191,21 +195,21 @@ The file generally can have a =Pass= entry for the encrypted passcode, but to sh Flatten . Channel personal-inbox - Master :personal-remote: - Slave :personal-local: + Far :personal-remote: + Near :personal-local: Patterns * !"[Gmail]/Drafts" !"[Gmail]/Spam" Expunge Both # Patterns "inbox" # ExpireUnread no Channel personal-sent - Master :personal-remote:"[Gmail]/Sent Mail" - Slave :personal-local:sent + Far :personal-remote:"[Gmail]/Sent Mail" + Near :personal-local:sent ExpireUnread yes Channel personal-trash - Master :personal-remote:"[Gmail]/Trash" - Slave :personal-local:trash + Far :personal-remote:"[Gmail]/Trash" + Near :personal-local:trash ExpireUnread yes #+end_src