~abcdw/rde

54a2ae9745862b524b9b5d9b163a3d5fc6f79ea8 — Andrew Tropin a month ago 8f631d6
rde: Use forked shell-profile service type.
2 files changed, 20 insertions(+), 1 deletions(-)

M gnu/home-services/shells.scm
M rde/features.scm
M gnu/home-services/shells.scm => gnu/home-services/shells.scm +1 -1
@@ 61,7 61,7 @@

(define-configuration home-shell-profile-configuration
  (profile
   (text-config '())
   (gexp-text-config '())
   "\
@code{home-shell-profile} is instantiated automatically by
@code{home-environment}, DO NOT create this service manually, it can

M rde/features.scm => rde/features.scm +19 -0
@@ 206,8 206,27 @@ to each system-services-getter function."
    #f "Value ~a is not provided by any feature.\n~a"
    key (or (and=> additional-msg (lambda (x) (string-append x "\n"))) ""))))

(use-modules (gnu home services)
             (gnu home services xdg)
             (gnu home services fontutils)
             (gnu home services symlink-manager)
             (gnu home-services shells))
(define (get-home-environment config)
  (home-environment
   (essential-services
    (list
     (service home-run-on-first-login-service-type)
     (service home-activation-service-type)
     (service home-environment-variables-service-type)

     (service home-symlink-manager-service-type)

     (service home-fontconfig-service-type)
     (service home-xdg-base-directories-service-type)
     (service home-shell-profile-service-type)

     (service home-service-type)
     (service home-profile-service-type '())))
   (services (rde-config-home-services config))))

(define bare-bone-os