From ea810593429900a4702c2d5774acbf0e4f95716a Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Mon, 31 Oct 2022 00:07:53 +0100 Subject: Home configuration: break out dot-files-service and home-files --- home-configuration.scm | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) (limited to 'home-configuration.scm') diff --git a/home-configuration.scm b/home-configuration.scm index be4fde6..28793de 100644 --- a/home-configuration.scm +++ b/home-configuration.scm @@ -6,6 +6,16 @@ #:use-module (gnu services) #:use-module (guix gexp)) +(define home-files + `((".config/guix/shell-authorized-directories" ,(local-file "g-sh-auth-dir")) + (".emacs" ,(local-file "emacs.el")) + (".ssh/config" ,(local-file "ssh.config")))) + +(define dot-files-service + (simple-service 'dot-files + home-files-service-type + home-files)) + (let ([config-prefix "/home/marek/src/guix-config/"]) (home-environment (packages (map (compose list specification->package+output) @@ -58,8 +68,4 @@ (bashrc `(,(local-file (string-append config-prefix ".bashrc") "bashrc"))))) - ,(simple-service 'dot-files - home-files-service-type - `((".config/guix/shell-authorized-directories" ,(local-file "guix-shell-authorized-directories")) - (".emacs" ,(local-file "emacs.el")) - (".ssh/config" ,(local-file "ssh.config")))))))) + ,dot-files-service)))) -- cgit v1.2.3