diff options
| author | EuAndreh <eu@euandre.org> | 2020-11-29 21:00:14 -0300 |
|---|---|---|
| committer | EuAndreh <eu@euandre.org> | 2020-11-29 21:00:14 -0300 |
| commit | 7dced89907b93c5848145006a101090e2081f88b (patch) | |
| tree | fe4ff86c39faa3b39a8a019025f9761b80b2eee7 /sync | |
| parent | vps.scm: Always restart mcron on system activation (diff) | |
| download | server-7dced89907b93c5848145006a101090e2081f88b.tar.gz server-7dced89907b93c5848145006a101090e2081f88b.tar.xz | |
vps.scm: WIP test wrapping code in '(with-imported-modules ...)'
Diffstat (limited to 'sync')
| -rw-r--r-- | sync/vps.scm | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/sync/vps.scm b/sync/vps.scm index 55ebbfe..5f9df1e 100644 --- a/sync/vps.scm +++ b/sync/vps.scm @@ -2,6 +2,7 @@ (gnu) (guix) ((guix build utils) #:prefix utils:) + ((guix modules) #:prefix modules:) ((srfi srfi-1) #:prefix srfi-1:) ((ice-9 textual-ports) #:prefix textual-ports:) ((ice-9 ftw) #:prefix ftw:) @@ -302,8 +303,14 @@ pki " mail-domain " key \"" (tls-priv-for mail-domain) "\""))) tls-prefixes))) (define generate-ci-index-html-job - #~(job "*/5 * * * *" - generate-ci-index-html)) + #~(job "* * * * *" ;; "*/5 * * * *" + #$(program-file + "generate-ci-index-html.scm" + (with-imported-modules (modules:source-module-closure + '((guix build utils))) + #~(begin + (use-modules (guix build utils)) + (display 'generate-ci-index-html)))))) (define restore-logfiles-job #~(job "1 * * * *" |