aboutsummaryrefslogtreecommitdiff
path: root/kbg
diff options
context:
space:
mode:
authorKenny Ballou <kb@devnulllabs.io>2023-04-10 13:02:50 -0600
committerKenny Ballou <kb@devnulllabs.io>2023-04-10 13:02:50 -0600
commit941630d184215421fd2a5533a8761da16708ad9b (patch)
tree99f716ba5e04227f99e750c92a7d530cff78b397 /kbg
parent7afc097f011e770218b180d6b1c25949126a06e3 (diff)
downloaddotfiles-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.scm24
-rw-r--r--kbg/services/shepherd.scm3
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