[home] Symlink profile.d files.

diff --git a/conf/home/bash.scm b/conf/home/bash.scm
index d5dbd6b9f964c6c1065316e047ea9b226a72bc55..9efb1c77ed1fcf0c6dfc061b5db4e1da41650443 100644 (file)
--- a/conf/home/bash.scm
+++ b/conf/home/bash.scm
@@ -4,13 +4,13 @@
 ;; bash.scm - custom bash configuration.
 
 (define-module (conf home bash)
+  #:use-module (conf home symlink)
   #:use-module (gnu home services)
   #:use-module (gnu packages bash)
   #:use-module (gnu services configuration)
   #:use-module (guix gexp)
   #:use-module (guix packages)
-  #:export (home-bash-configuration
-           home-bash-service-type))
+  #:export (bash-services))
 
 (define (serialize-string field-name value)
   value)
@@ -48,3 +48,16 @@
    (default-value (home-bash-configuration))
    (description "Installs bash packages and symlinks @file{.bash_profile} and
 @file{.bashrc}.")))
+
+(define bash-service
+  (service home-bash-service-type))
+
+(define profile-service
+  (service home-symlink-service-type
+          (list "bash/.config/profile.d/10-xdg.sh"
+                "bash/.config/profile.d/20-less.sh"
+                "bash/.config/profile.d/50-bash.sh")))
+
+(define bash-services
+  (list bash-service
+       profile-service))

diff --git a/home.scm b/home.scm
index a9de340747c4c5f4532f97275e44932fefb138e5..7dcee5578e5399cb08d9ec0fc553df218cf994e7 100644 (file)
--- a/home.scm
+++ b/home.scm
@@ -5,7 +5,6 @@
 
 (use-modules (conf home bash)
             (conf home program)
-            (conf home symlink)
              (gnu home services)
             (gnu packages base)
             (gnu packages version-control)
@@ -15,11 +14,9 @@
 (home-environment
  (packages (list))
  (services
-  (list (service home-bash-service-type)
-       (service home-symlink-service-type
-                (list "bash/.config/profile.d/10-xdg.sh"
-                      "bash/.config/profile.d/20-less.sh"))
-       (service home-program-service-type
-                (home-program-configuration
-                 (packages (list git))
-                 (dotfiles (list "git/.config/git/config")))))))
+  (append
+   (list (service home-program-service-type
+                 (home-program-configuration
+                  (packages (list git))
+                  (dotfiles (list "git/.config/git/config")))))
+   bash-services)))