diff options
Diffstat (limited to 'attic/elisp/misc.el')
| -rw-r--r-- | attic/elisp/misc.el | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/attic/elisp/misc.el b/attic/elisp/misc.el index 0e74ea4..8fe9bfd 100644 --- a/attic/elisp/misc.el +++ b/attic/elisp/misc.el @@ -1301,3 +1301,15 @@ It should be the title of the web page as returned by `rdrview'" (lsp-ui-peek-always-show t) (lsp-ui-sideline-show-hover t) (lsp-ui-doc-enable t)) +;;; xbar +(defvar jao-notmuch-xbar-queries + `((:name "" :query "tag:new and not tag:draft" :face jao-themes-f00) + (:name "i" :query "tag:new and tag:/inbox|write|drivel/" + :face jao-themes-warning))) + +(defvar jao-notmuch-mac-xbar t) + +(defun jao-notmuch-xbar () + (let ((cnts (notmuch-hello-query-counts jao-notmuch-xbar-queries))) + (jao-shell-exec (format "echo '%s | color=#8b3626 | size=11' >/tmp/xbar" + (mapconcat 'jao-notmuch--qstr cnts " "))))) |