From a147faefabd1d9031536d248db0ba58818148ff6 Mon Sep 17 00:00:00 2001 From: Luis Guilherme Coelho Date: Mon, 11 Nov 2024 12:08:12 -0300 Subject: [PATCH] operating-systems: buer: Add /etc/config.scm as a special file that symlinks to (operating-systems buer) module location --- operating-systems/buer.scm | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/operating-systems/buer.scm b/operating-systems/buer.scm index 7798c30..7b4e281 100644 --- a/operating-systems/buer.scm +++ b/operating-systems/buer.scm @@ -90,7 +90,10 @@ #|SRFIs|# #|1|# #:use-module (srfi srfi-1) - #:export (buer)) + #:export (buer buer.scm)) + +(define buer.scm + (search-path %load-path (module-filename (current-module)))) (define buer (operating-system @@ -301,8 +304,9 @@ #|Special file services|# (service special-files-service-type `(("/bin/sh" ,(file-append bash "/bin/bash")) - ("/usr/bin/env" ,(file-append coreutils "/bin/env")))) - (simple-service 'persistent-files-service + ("/usr/bin/env" ,(file-append coreutils "/bin/env")) + ("/etc/config.scm" ,buer.scm))) + (simple-service 'persistent-files special-files-service-type (map (juxt identity (partial string-append "/gnu/persist/"))