diff options
| -rw-r--r-- | email.org | 2 | ||||
| -rw-r--r-- | init.org | 5 | ||||
| -rw-r--r-- | lib/themes/jao-light-theme.el | 2 | ||||
| -rw-r--r-- | lib/themes/jao-themes.el | 3 |
4 files changed, 10 insertions, 2 deletions
@@ -657,7 +657,7 @@ :config (setq message-directory "~/var/mail/" message-auto-save-directory (expand-file-name "drafts" message-directory)) - :bind (:map notmuch-message-mode-map + :bind (:map message-mode-map (("C-c C-d" . notmuch-draft-postpone)))) #+end_src @@ -1686,6 +1686,11 @@ (if (fboundp 'w3m-view-mode) (w3m-view-source) (View-quit)) (when url (cons url (or title "")))))))) + (defun jao-list-mailboxes (base) + (let ((dir (expand-file-name base "~/var/mail"))) + (seq-difference (directory-files dir) + '("." ".." "sent" "inbox" "trash")))) + (defun jao-rss-subscribe () (interactive) (let* ((url (or (jao-url-around-point) diff --git a/lib/themes/jao-light-theme.el b/lib/themes/jao-light-theme.el index 659f930..7772763 100644 --- a/lib/themes/jao-light-theme.el +++ b/lib/themes/jao-light-theme.el @@ -116,7 +116,7 @@ :box (:line-width 1 :color "grey90")) (mode-line-inactive (c "grey40" dimm-background-4) :box (:line-width 1 :color "grey90")) - (mode-line-buffer-id (~ mode-line) (c dark-blue-2) nit) + (mode-line-buffer-id (~ default) (c dark-blue-2) nit) (mode-line-emphasis (c green nil)) (mode-line-highlight (c green nil)) (org-link (p link) (ul "grey80")) diff --git a/lib/themes/jao-themes.el b/lib/themes/jao-themes.el index d1b1822..5e47795 100644 --- a/lib/themes/jao-themes.el +++ b/lib/themes/jao-themes.el @@ -1100,6 +1100,9 @@ (widget-field (p hilite) bx) (widget-inactive (p dimm)) (Widget-single-line-field (~ widget-field)) + (window-divider (~ vertical-border)) + (window-divider-first-pixel (~ window-divider)) + (window-divider-last-pixel (~ window-divider)) (woman-bold (p f00) bf) (woman-italic (p f01) nul nit) (woman-italic-no-ul (p f01) nul nit))))) |