summary refs log tree commit diff
diff options
context:
space:
mode:
authorFranck Cuny <franck@fcuny.net>2022-09-17 14:05:06 -0700
committerFranck Cuny <franck@fcuny.net>2022-09-17 14:05:06 -0700
commit7c18129e423db65c95b1c94b117959ab7c58023d (patch)
tree859e459d45724566f0f0a29c96a0ad1a29f9c161
parentfeat(lang/go): configure Emacs for go (diff)
downloademacs.d-7c18129e423db65c95b1c94b117959ab7c58023d.tar.gz
ref(email): remove configuration for notmuch
I'm not going to read my emails with Emacs ...

Change-Id: I649239057e5a0c35ebbb1eb329b9bee956dd2668
-rw-r--r--emacs/custom/my-notmuch.el79
-rw-r--r--emacs/init.el1
2 files changed, 0 insertions, 80 deletions
diff --git a/emacs/custom/my-notmuch.el b/emacs/custom/my-notmuch.el
deleted file mode 100644
index b150619..0000000
--- a/emacs/custom/my-notmuch.el
+++ /dev/null
@@ -1,79 +0,0 @@
-;;; my-notmuch.el --- Configures notmuch -*- lexical-binding: t -*-
-
-;;; Commentary:
-
-;;; Code:
-
-(require 'notmuch)
-
-(setq mail-envelope-from 'header)
-(setq mail-specify-envelope-from t)
-(setq message-sendmail-envelope-from 'header)
-
-(setq mail-host-address (system-name))
-
-(setq notmuch-mua-user-agent-function
-      (lambda () (format "Emacs %s; notmuch.el %s" emacs-version notmuch-emacs-version)))
-(setq notmuch-mua-cite-function #'message-cite-original-without-signature)
-
-(defvar my/notmuch-cache-dir (format "%s/.cache/notmuch" (getenv "HOME")))
-(make-directory my/notmuch-cache-dir t)
-
-;; Cache addresses for completion:
-(setq notmuch-address-save-filename (concat my/notmuch-cache-dir "/addresses"))
-
-;; kill the buffer after sending the message
-(setq message-kill-buffer-on-exit t)
-
-(setq message-send-mail-function 'message-send-mail-with-sendmail)
-(setq send-mail-function 'sendmail-send-it)
-
-(setq notmuch-show-logo nil)
-(setq notmuch-always-prompt-for-sender t)
-(setq notmuch-show-relative-dates t)
-(setq notmuch-archive-tags '("-inbox" "-unread" "-new" "+archive"))
-(setq notmuch-fcc-dirs '(("franck@fcuny.net" . "\"FastMail/Sent\" +sent +fastmail -inbox")))
-
-;; configurations related to search
-;; (TODO: this is not working !?)
-(setq notmuch-search-oldest-first nil)
-
-;; a few saved search - I can jump to them by hitting 'j'
-(setq notmuch-saved-searches '(;; all unread messages in my inbox
-                               (:name "inbox unread" :query "tag:inbox AND tag:unread" :key "U" :sort-order "newest-first")
-                               ;; all messages in my inbox
-                               (:name "inbox" :query "tag:inbox" :key "i")
-                               ;; all messages for the current day
-                               (:name "today" :query "date:today" :key "t" :sort-order "newest-first")
-                               ;; all messages for the current week
-                               (:name "this week" :query "date:this_week.." :key "w")
-                               ;; all messages in the inbox that are
-                               ;; unread and less than a week old
-                               (:name "focused inbox" :query "tag:inbox AND tag:unread AND date:this_week.." :key "f")
-                               ;; all messages that are flagged
-                               (:name "flagged" :query "tag:flagged" :key "F")
-                               ;; all messages that have a calendar
-                               ;; invitation, that are unread and in
-                               ;; my inbox
-                               (:name "pending calendar invites" :query "tag:unread AND tag:inbox AND attachment:ics" :key "c")
-                               ;; all unread messages for a year
-                               (:name "unread":query "tag:unread AND date:this_year.." :key "u")
-                               ;; all messages I've sent
-                               (:name "sent" :query "tag:sent" :key "s")
-                               ;; all my emails, no filter
-                               (:name "all emails" :query "*" :key "a")))
-(setq notmuch-show-empty-saved-searches t)
-
-;; make it short and sweet
-(setq notmuch-search-result-format
-      '(("date" . "%12s ")
-        ("count" . "%-7s ")
-        ("authors" . "%-30s ")
-        ("subject" . "%-72s ")
-        ("tags" . "(%s)")))
-
-(add-hook 'notmuch-message-mode-hook 'flyspell-mode)
-
-(provide 'my-notmuch)
-
-;;; my-notmuch.el ends here
diff --git a/emacs/init.el b/emacs/init.el
index 7db5aab..0aa712d 100644
--- a/emacs/init.el
+++ b/emacs/init.el
@@ -47,7 +47,6 @@
 (require 'my-prog)
 (require 'my-eshell)
 (require 'my-tramp)
-(require 'my-notmuch)
 (require 'my-elfeed)
 
 (require 'my-lsp)