diff options
| author | Oscar Najera <hi@oscarnajera.com> | 2023-09-18 13:11:25 +0200 |
|---|---|---|
| committer | Oscar Najera <hi@oscarnajera.com> | 2023-09-18 13:11:25 +0200 |
| commit | bf071575fc77830487798ff3fc626bf6cac3d459 (patch) | |
| tree | d5b11fa850058601d34600b56358c36aa13c9596 | |
| parent | f12ef5e990a1eb4eb5193b6967ae15ca384b010f (diff) | |
| download | dotfiles-bf071575fc77830487798ff3fc626bf6cac3d459.tar.gz dotfiles-bf071575fc77830487798ff3fc626bf6cac3d459.tar.bz2 dotfiles-bf071575fc77830487798ff3fc626bf6cac3d459.zip | |
shepherd script syntax sugar
| -rw-r--r-- | config/shepherd/init.scm | 6 |
1 files changed, 3 insertions, 3 deletions
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: |