diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/eos/jao-afio.el | 21 | ||||
-rw-r--r-- | lib/themes/jao-themes.el | 16 |
2 files changed, 25 insertions, 12 deletions
diff --git a/lib/eos/jao-afio.el b/lib/eos/jao-afio.el index 1410b80..e6f1e72 100644 --- a/lib/eos/jao-afio.el +++ b/lib/eos/jao-afio.el @@ -20,6 +20,12 @@ ;;; Code: +(defvar jao-open-doc-fun 'find-file) +(defvar jao-afio-mail-function 'gnus) +(defvar jao-afio-use-w3m nil) +(defvar jao-afio-notmuch-in-web t) +(defvar jao-afio-switch-hook nil) + (defvar jao-afio--configs '(?c ?w ?g ?p ?s)) (defvar jao-afio--current-config (car jao-afio--configs)) (defvar jao-afio--locker nil) @@ -64,9 +70,6 @@ (jao-afio--goto-frame next))) ;;;###autoload -(defvar jao-open-doc-fun 'find-file) - -;;;###autoload (defun jao-afio-open-pdf-session () (interactive) (dolist (doc (jao-doc-view-session)) @@ -86,10 +89,6 @@ (when (and (jao-doc-view-session) (y-or-n-p "Load saved session? ")) (jao-afio-open-pdf-session))))) -(defvar jao-afio-mail-function 'gnus) -(defvar jao-afio-use-w3m nil) -(defvar jao-afio-notmuch-in-web t) - (declare w3m "w3m") (declare w3m-alive-p "w3m") (declare w3m-previous-buffer "w3m") @@ -128,9 +127,11 @@ (interactive) (if (or (null jao-afio-mail-function) (eq 'gnus jao-afio-mail-function)) (jao-afio-open-gnus) - (delete-other-windows) + (jao-trisect) + (other-window 2) + (delete-window) + (other-window 1) (funcall jao-afio-mail-function) - (jao-bisect) (other-window 1) (find-file (expand-file-name "inbox.org" org-directory)) (split-window-below (/ (window-height) 3)) @@ -141,8 +142,6 @@ (switch-to-buffer "*Calendar*") (other-window 1))) -(defvar jao-afio-switch-hook nil) - (defun jao-afio--goto-frame (next &optional reset) (when (or reset (not (eq next jao-afio--current-config))) (let ((next-cfg (when (not reset) (get-register next)))) diff --git a/lib/themes/jao-themes.el b/lib/themes/jao-themes.el index 6e55cc6..fbb4827 100644 --- a/lib/themes/jao-themes.el +++ b/lib/themes/jao-themes.el @@ -861,10 +861,24 @@ (nrepl-output-face (p f02)) (nrepl-prompt-face (p f00)) (nrepl-result-face nil) + (notmuch-crypto-decryption (~ success)) + (notmuch-crypto-part-header (p f11)) + (notmuch-crypto-signature-bad (p error) ul) + (notmuch-crypto-signature-good (~ success)) + (notmuch-crypto-signature-unknown (p error) ul) + (notmuch-crypto-signature-good-key (~ success)) + (notmuch-hello-logo-background nil) + (notmuch-message-summary-face (p f00)) (notmuch-search-count (p f00)) (notmuch-search-date (p f01)) + (notmuch-search-flagged-face (p warn)) (notmuch-search-matching-authors (p f02)) - (notmuch-search-subject nil)) + (notmuch-search-subject nil) + (notmuch-tag-face (p f00) it) + (notmuch-tag-unread (p warn)) + (notmuch-tree-match-author-face (p f01)) + (notmuch-tree-match-tag-face ul) + (notmuch-wash-cited-text (~ gnus-cite-1))) `((orderless-match-face-0 ul) (orderless-match-face-1 ul) (orderless-match-face-2 ul) |