diff options
author | Timo Wilken | 2024-05-28 20:26:30 +0200 |
---|---|---|
committer | Timo Wilken | 2024-05-28 20:26:30 +0200 |
commit | bdc2bd1055d7623eefb90f216cc63b6f8928ec0d (patch) | |
tree | 718e5e4eeeae0f6bd2642ac284921cdceb3e1fbc /tw | |
parent | 367b0e7c1788ffdbbb5f6df29a55fd1bc7d21463 (diff) |
Fix Docker Shepherd service
Diffstat (limited to 'tw')
-rw-r--r-- | tw/services/docker.scm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/tw/services/docker.scm b/tw/services/docker.scm index 0f982836..943cf105 100644 --- a/tw/services/docker.scm +++ b/tw/services/docker.scm @@ -107,11 +107,12 @@ system that this container relies on.")) ,@extra-requirements)) (documentation (format #f "Run a Docker container called ~s from the image ~s." (maybe-value name) image)) + (modules `(((srfi srfi-1) #:select (every)) + ((srfi srfi-26) #:select (cut)) + (ice-9 popen) + (ice-9 textual-ports) + ,@%default-modules)) (start #~(lambda () - (use-modules ((srfi srfi-1) #:select (every)) - ((srfi srfi-26) #:select (cut)) - (ice-9 popen) - (ice-9 textual-ports)) (let* ((hex (char-set #\0 #\1 #\2 #\3 #\4 #\5 #\6 #\7 #\8 #\9 #\a #\b #\c #\d #\e #\f #\A #\B #\C #\D #\E #\F)) (pipe |