diff options
author | Kenny Ballou <kb@devnulllabs.io> | 2023-04-10 13:02:50 -0600 |
---|---|---|
committer | Kenny Ballou <kb@devnulllabs.io> | 2023-04-10 13:02:50 -0600 |
commit | 941630d184215421fd2a5533a8761da16708ad9b (patch) | |
tree | 99f716ba5e04227f99e750c92a7d530cff78b397 /kbg | |
parent | 7afc097f011e770218b180d6b1c25949126a06e3 (diff) | |
download | dotfiles-941630d184215421fd2a5533a8761da16708ad9b.tar.gz dotfiles-941630d184215421fd2a5533a8761da16708ad9b.tar.xz |
parallel: ensure cache directory tree is created
Signed-off-by: Kenny Ballou <kb@devnulllabs.io>
Diffstat (limited to 'kbg')
-rw-r--r-- | kbg/services/parallel.scm | 24 | ||||
-rw-r--r-- | kbg/services/shepherd.scm | 3 |
2 files changed, 27 insertions, 0 deletions
diff --git a/kbg/services/parallel.scm b/kbg/services/parallel.scm new file mode 100644 index 00000000..2a8962fc --- /dev/null +++ b/kbg/services/parallel.scm @@ -0,0 +1,24 @@ +(define-module (kbg services parallel) + #:use-module (kbg) + #:use-module (gnu) + #:use-module (guix) + #:use-module (gnu services) + #:use-module (gnu services shepherd) + #:use-module (gnu home services) + #:use-module (gnu home services shepherd) + #:use-module (gnu services audio) + #:use-module (gnu packages base) + #:use-module (gnu packages mpd) + #:use-module (system repl server)) + +(define-public parallel-mk-temp-dir-service + (list (shepherd-service + (documentation "Ensure parallel cache/temporary directory is created ") + (provision '(parallel-mk-temp-dir)) + (requirement '()) + (one-shot? #t) + (start #~(make-forkexec-constructor + (list #$(file-append coreutils "/bin/mkdir") + "-p" + (string-append (getenv "XDG_CACHE_HOME") + "/parallel/tmp"))))))) diff --git a/kbg/services/shepherd.scm b/kbg/services/shepherd.scm index cd77654f..e3f6efb9 100644 --- a/kbg/services/shepherd.scm +++ b/kbg/services/shepherd.scm @@ -12,6 +12,7 @@ #: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) #:export (services-for-host)) @@ -28,6 +29,7 @@ (services (append gnupg-service languagetool-service mpd-service + parallel-mk-temp-dir-service syncthing-service)))))) @@ -37,6 +39,7 @@ (services (append gnupg-service languagetool-service mpd-service + parallel-mk-temp-dir-service syncthing-service)))))) (define koi-shepherd-services |