(define-module (users id1001)
  ;; home-environment
  #:use-module (gnu home)

  ;; home-profile-service-type
  ;; home-xdg-configuration-files-service-type
  #:use-module (gnu home services)

  ;; simple-service
  #:use-module (gnu services)

  ;; user-account
  #:use-module (gnu system shadow)

  ;; %suweren-home-services
  #:use-module (suweren home))

;; string
(define-public uid1001-name
  "lilia")

;; (string) ->
;; record user-account
(define-public uid1001-account
  (user-account (name uid1001-name)
		(group "users")
		(uid 1001)
		(comment "Liliana Ruszuk")
		(home-directory "/home/lilia")))

;; record home-environment
(define-public uid1001-home-environment
  (lambda (host-name*)
    (let* ((packages (list ))

	   (profile (simple-service 'user-packages
				    home-profile-service-type
				    packages))

	   (%suweren-home-services* (%suweren-home-services host-name*))
	   (user-services (list profile))

	   (services* (append %suweren-home-services*
			      user-services)))
      (home-environment (services services*)))))