From 8bcdff263c31892161c5c40eb848f02b88c18624 Mon Sep 17 00:00:00 2001 From: Griffin Smith Date: Mon, 6 Jul 2020 11:08:03 -0400 Subject: refactor(gs/emacs): Break email config into its own file Change-Id: I90327cbd2d8a735cdedae7f7b5412959cf710aef Reviewed-on: https://cl.tvl.fyi/c/depot/+/938 Tested-by: BuildkiteCI Reviewed-by: glittershark --- users/glittershark/emacs.d/config.el | 17 +---------------- users/glittershark/emacs.d/email.el | 16 ++++++++++++++++ 2 files changed, 17 insertions(+), 16 deletions(-) create mode 100644 users/glittershark/emacs.d/email.el diff --git a/users/glittershark/emacs.d/config.el b/users/glittershark/emacs.d/config.el index 1cfa586ef11a..afeb990e8875 100644 --- a/users/glittershark/emacs.d/config.el +++ b/users/glittershark/emacs.d/config.el @@ -28,6 +28,7 @@ (load! "org-gcal") (load! "grid") (load! "nix") +(load! "email") (require 's) (require 'tvl) @@ -1201,22 +1202,6 @@ (use-package! direnv :config (direnv-mode)) -(after! notmuch - (setq notmuch-saved-searches - '((:name "inbox" :query "tag:inbox tag:important not tag:trash" :key "i") - (:name "flagged" :query "tag:flagged" :key "f") - (:name "sent" :query "tag:sent" :key "s") - (:name "drafts" :query "tag:draft" :key "d") - - (:name "work" :query "tag:inbox and tag:important and path:work/**" - :key "w") - (:name "personal" :query "tag:inbox and tag:important and path:personal/**" - :key "p")) - message-send-mail-function 'message-send-mail-with-sendmail) - - (add-hook! notmuch-message-mode-hook - #'notmuch-company-setup)) - (after! erc ;; (setq erc-autojoin-channels-alist '(("freenode.net" "#nixos" "#haskell" "##tvl"))) ) diff --git a/users/glittershark/emacs.d/email.el b/users/glittershark/emacs.d/email.el new file mode 100644 index 000000000000..13ada5760667 --- /dev/null +++ b/users/glittershark/emacs.d/email.el @@ -0,0 +1,16 @@ +;;; ~/code/depot/users/glittershark/emacs.d/email.el -*- lexical-binding: t; -*- + +(after! notmuch + (setq notmuch-saved-searches + '((:name "inbox" :query "tag:inbox tag:important not tag:trash" :key "i") + (:name "flagged" :query "tag:flagged" :key "f") + (:name "sent" :query "tag:sent" :key "s") + (:name "drafts" :query "tag:draft" :key "d") + + (:name "work" :query "tag:inbox and tag:important and path:work/**" + :key "w") + (:name "personal" :query "tag:inbox and tag:important and path:personal/**" + :key "p")) + message-send-mail-function 'message-send-mail-with-sendmail) + + (add-hook! notmuch-message-mode-hook #'notmuch-company-setup)) -- cgit 1.4.1