From 8bcdff263c31892161c5c40eb848f02b88c18624 Mon Sep 17 00:00:00 2001
From: Griffin Smith <grfn@gws.fyi>
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 <grfn@gws.fyi>
---
 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

(limited to 'users')

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