From bf071575fc77830487798ff3fc626bf6cac3d459 Mon Sep 17 00:00:00 2001 From: Oscar Najera Date: Mon, 18 Sep 2023 13:11:25 +0200 Subject: shepherd script syntax sugar --- config/shepherd/init.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'config') diff --git a/config/shepherd/init.scm b/config/shepherd/init.scm index d7f31b1..c94b034 100644 --- a/config/shepherd/init.scm +++ b/config/shepherd/init.scm @@ -1,14 +1,14 @@ ;; init.scm -- default shepherd configuration file. -(use-modules ((ice-9 ftw) #:select (scandir))) +(use-modules ((ice-9 ftw) #:select (scandir)) + (srfi srfi-26)) ;; Load all the files in the directory 'init.d' with a suffix '.scm'. (for-each (lambda (file) (load (string-append "init.d/" file))) (scandir (string-append (dirname (current-filename)) "/init.d") - (lambda (file) - (string-suffix? ".scm" file)))) + (cut string-suffix? ".scm" <>))) ;; Services known to shepherd: -- cgit v1.2.3