diff options
author | Kenny Ballou <kb@devnulllabs.io> | 2023-12-12 17:00:38 -0700 |
---|---|---|
committer | Kenny Ballou <kb@devnulllabs.io> | 2023-12-16 08:47:49 -0700 |
commit | a25716c56c9ca42daa34a7fc688f3e6c117b817f (patch) | |
tree | 9f231bdfda02f4fcaeada0e2b014b75f0f5d8bb7 /kbg | |
parent | aa4f2bb712c13570bb3c082aeefdc9148d3270ab (diff) | |
download | dotfiles-a25716c56c9ca42daa34a7fc688f3e6c117b817f.tar.gz dotfiles-a25716c56c9ca42daa34a7fc688f3e6c117b817f.tar.xz |
config: home-mcron: use naked mcron by default
Signed-off-by: Kenny Ballou <kb@devnulllabs.io>
Diffstat (limited to 'kbg')
-rw-r--r-- | kbg/services/mcron.scm | 61 | ||||
-rw-r--r-- | kbg/services/shepherd.scm | 1 |
2 files changed, 0 insertions, 62 deletions
diff --git a/kbg/services/mcron.scm b/kbg/services/mcron.scm deleted file mode 100644 index 4b5af849..00000000 --- a/kbg/services/mcron.scm +++ /dev/null @@ -1,61 +0,0 @@ -(define-module (kbg services mcron) - #:use-module (kbg) - #:use-module (kbg private-data) - #:use-module (guix gexp) - #:use-module (gnu) - #:use-module (gnu home) - #:use-module (gnu home services) - #:use-module (gnu home services mcron) - #:use-module (gnu services) - #:use-module (gnu packages) - #:use-module (gnu packages backup) - #:use-module (gnu packages guile-xyz) - #:use-module (mcron base) - #:use-module (mcron job-specifier) - #:export (mcron-service)) - -(define borg-backup-job - #~(job "0 * 0 0 0" - (lambda () - (system (string-append borg "/bin/borg") - "create" - "--stats" - "--progress" - "--show-rc" - "--compression lz4" - "--exclude-caches" - "--exclude 'node_modules'" - "--exclude '/home/*/.cache/*'" - "--exclude '/home/*/tmp/*'" - "--exclude '/home/*/guixtest/*'" - "--exclude '/home/*/.var/*'" - "--exclude '/home/*/.config/Element/*'" - "--exclude '/home/*/.config/Signal/*'" - "--exclude '/home/*/.config/Slack/*'" - "--exclude '/home/*/.local/share/Zeal/*'" - "--remote-ratelimit 2048" - (string-append %borg-repository "::$(hostname)-$(uuidgen --time)" - "/home/kb/"))) - "Borg Backup Creation")) - -(define borg-backup-prune-job - #~(job "10 * 0 0 0" - (lambda () - (system (string-append borg "/bin/borg") - "prune" - "--stats" - "--progress" - "--show-rc" - "--keep-hourly=24" - "--keep-daily=7" - "--keep-weakly=4" - "--keep-monthly=6" - "--keep-yearly=2" - "--prefix=$(hostname)" - %borg-repository)) - "Borg Backup Pruning")) - -(define mcron-service - (list (simple-service 'home-mcron - home-mcron-service-type - (list borg-backup-job borg-backup-prune-job)))) diff --git a/kbg/services/shepherd.scm b/kbg/services/shepherd.scm index e3f6efb9..ec1f5566 100644 --- a/kbg/services/shepherd.scm +++ b/kbg/services/shepherd.scm @@ -10,7 +10,6 @@ #:use-module (system repl server) #:use-module (kbg services gnupg) #:use-module (kbg services languagetool) - #:use-module (kbg services mcron) #:use-module (kbg services mpd) #:use-module (kbg services parallel) #:use-module (kbg services syncthing) |