fix ayase: properly implement user packages

1 files changed, 25 insertions, 6 deletions

diff --git a/users/marekpasnikowski.scm b/users/marekpasnikowski.scm
index 1236c3b..d45926e 100644
--- a/users/marekpasnikowski.scm
+++ b/users/marekpasnikowski.scm
@@ -1,10 +1,29 @@
 (define-module (users marekpasnikowski)
-  #:use-module (gnu home)
-  #:use-module (suweren home)
-  #:use-module (suweren trezor))
+  #:use-module (gnu home) ; home-environment
+  #:use-module (gnu home services) ; home-profile-service-type
+  #:use-module (gnu packages emacs) ; emacs
+  #:use-module (gnu packages emacs-xyz) ; emacs-org-roam emacs-paredit
+  #:use-module (gnu packages librewolf) ; librewolf
+  #:use-module (gnu services) ; simple-service
+  #:use-module (suweren home) ; %home-environment %suweren-home-services
+  #:use-module (suweren trezor)) ; trezor-bridge
 
-(define-public marekpasnikowski-services
-  (append trezor-bridge))
+(define marekpasnikowski-services
+  (let* ((packages (list emacs
+			 emacs-org-roam
+			 emacs-paredit
+			 librewolf))
+
+	 (profile (list (simple-service 'marekpasnikowski-packages
+					home-profile-service-type
+					packages))))
+    (append %suweren-home-services
+	    profile
+	    ;; trezor-bridge
+	    )))
 
 (define-public home
-  (home-environment (inherit %home-environment)))
+  (let ((services (append %suweren-home-services
+			  marekpasnikowski-services)))
+    (home-environment (inherit %home-environment)
+		      (services marekpasnikowski-services))))