aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--config/doom/config.org16
1 files changed, 16 insertions, 0 deletions
diff --git a/config/doom/config.org b/config/doom/config.org
index c2579df..aaff478 100644
--- a/config/doom/config.org
+++ b/config/doom/config.org
@@ -332,6 +332,22 @@ this new window.
(use-package! org-mime
:after (org notmuch)
:config (setq org-mime-library 'mml))
+
+(require 'comint)
+(require 'ansi-color)
+
+(defun on/fetch-all-email ()
+ "Start tagmail fetch on a subprocess."
+ (interactive)
+ (with-current-buffer (get-buffer-create "*E-mail fetch*")
+ (pop-to-buffer (current-buffer))
+ (comint-mode)
+ (ansi-color-for-comint-mode-on)
+ (make-process
+ :name "E-mail fetch"
+ :buffer (current-buffer)
+ :command '("tagmail")
+ :filter #'comint-output-filter)))
#+END_SRC
** Sending email
#+begin_src emacs-lisp