From bf4224860427cc42bf23f566f885b9713d4606de Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Mon, 8 Nov 2021 01:15:50 +0000
Subject: gnus: remember to auto-tangle gnus.org when needed

---
 email.org | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'email.org')

diff --git a/email.org b/email.org
index 8dec9ac..48eded8 100644
--- a/email.org
+++ b/email.org
@@ -334,6 +334,12 @@
             gnus-home-directory "~/.emacs.d/gnus"
             gnus-directory gnus-home-directory
             mail-source-directory (expand-file-name "Mail" gnus-home-directory))
+
+      (when (eq jao-afio-mail-function 'gnus)
+        (let ((org-file (expand-file-name "gnus.org" jao-emacs-dir)))
+          (when (file-newer-than-file-p org-file gnus-init-file)
+            (org-babel-tangle-file org-file))))
+
     #+end_src
 *** Notifications
     #+begin_src emacs-lisp
-- 
cgit v1.2.3