summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-10-03 22:44:11 +0200
committerLudovic Courtès <ludo@gnu.org>2018-10-04 09:32:51 +0200
commit89fdd9ee0cc8817283449b33a8c1a2604c575c7e (patch)
treed8f07d01140d3df18a4f0a5bf1f64cc54d50a091
parentcd81c9e2a76f825534b1c48e722926d5c70fca8f (diff)
downloadguix-89fdd9ee0cc8817283449b33a8c1a2604c575c7e.tar.gz
services: rottlog: Use command strings in the mcron jobs.
* gnu/services/admin.scm (default-jobs): Remove the lambda around
"/…/bin/rottlog" to make "herd schedule mcron" more
transparent (otherwise it just says "Lambda function").
-rw-r--r--gnu/services/admin.scm6
1 files changed, 2 insertions, 4 deletions
diff --git a/gnu/services/admin.scm b/gnu/services/admin.scm
index f08c896334..d7bda61ed7 100644
--- a/gnu/services/admin.scm
+++ b/gnu/services/admin.scm
@@ -125,11 +125,9 @@ for ROTATION."
 
 (define (default-jobs rottlog)
   (list #~(job '(next-hour '(0))                  ;midnight
-               (lambda ()
-                 (system* #$(file-append rottlog "/sbin/rottlog"))))
+               #$(file-append rottlog "/sbin/rottlog"))
         #~(job '(next-hour '(12))                 ;noon
-               (lambda ()
-                 (system* #$(file-append rottlog "/sbin/rottlog"))))))
+               #$(file-append rottlog "/sbin/rottlog"))))
 
 (define-record-type* <rottlog-configuration>
   rottlog-configuration make-rottlog-configuration