From 073be792f311d046a616142051fbe22a2fa69a98 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Sat, 27 Jul 2024 09:40:19 +0200 Subject: fix(marekpasnikowski): remove doubled call to %suweren-home-services --- users/marekpasnikowski.scm | 22 ++++++++++------------ 1 file changed, 10 insertions(+), 12 deletions(-) diff --git a/users/marekpasnikowski.scm b/users/marekpasnikowski.scm index 0650fe7..e70e19d 100644 --- a/users/marekpasnikowski.scm +++ b/users/marekpasnikowski.scm @@ -17,27 +17,25 @@ ) ;; DEPRECATED -(define marekpasnikowski-services +(define-public home (let* ((packages (list emacs emacs-org-roam emacs-paredit)) - (profile (list (simple-service 'marekpasnikowski-packages - home-profile-service-type - packages)))) - (append %suweren-home-services - profile))) + (profile (simple-service 'marekpasnikowski-packages + home-profile-service-type + packages)) + + (user-services (list profile)) + + (services* (append %suweren-home-services + user-services))) + (home-environment (services services*)))) ;; string (define-public marekpasnikowski-username "marek") -;; DEPRECATED -(define-public home - (let ((services* (append %suweren-home-services - marekpasnikowski-services))) - (home-environment (services services*)))) - ;; (string) -> ;; record user-account (define-public (marekpasnikowski-account supplementary-groups*) -- cgit v1.2.3