From d3c70b6e7c06de2e06c12c22eda6aa7b1c156b65 Mon Sep 17 00:00:00 2001
From: bd <bdunahu@operationnull.com>
Date: Tue, 4 Jun 2024 21:16:38 -0600
Subject: Use mcron to automatically sync mail

---
 .config/guix/modules/base.scm | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/.config/guix/modules/base.scm b/.config/guix/modules/base.scm
index 248fe0a..34a4946 100644
--- a/.config/guix/modules/base.scm
+++ b/.config/guix/modules/base.scm
@@ -10,6 +10,7 @@
   #:use-module (gnu home services)
   #:use-module (gnu home services dict)
   #:use-module (gnu home services gnupg)
+  #:use-module (gnu home services mcron)
   #:use-module (gnu home services shells)
   #:use-module (gnu home services shepherd)
   #:use-module (gnu home services ssh)
@@ -163,6 +164,15 @@
              (default-cache-ttl-ssh 28800)
              (max-cache-ttl-ssh 28800)))
 
+   (service home-mcron-service-type
+            (home-mcron-configuration
+             (jobs
+              (list
+               #~(job
+                  ;; twenty minutes
+                  (lambda (current-time) (+ current-time (* 20 60)))
+                  "~/.local/bin/sync-mail")))))
+
    (service home-bash-service-type
             (home-bash-configuration
              (aliases '(("cp" . "cp -i")
-- 
cgit v1.2.3