;;; SPDX-License-Identifier: GPL-3.0-or-later
;;; SPDX-FileCopyrightText: 2025 Marek Paśnikowski <marek@marekpasnikowski.pl>

(define-module (users id1001)
  #:use-module ( (deployment users)
                 #:prefix deployment:users:)
  #:use-module ( (gnu home)
                 #:prefix gnu:home:)
  #:use-module ( (gnu system accounts)
                 #:prefix gnu:system:accounts:)
  #:use-module ( (sovereign services admin)
                 #:prefix sovereign:services:admin:)
  #:use-module ( (sovereign systems)
                 #:prefix sovereign:systems:))

(define name
  "janusz")

(define home-environment
  (let
    ( (l-services (list sovereign:services:admin:update-commands)))
    (gnu:home:home-environment
      (packages sovereign:systems:common-home-environment-packages)
      (services l-services))))

(define-public name/home-environment
  (list name
        home-environment))

(define-public user-account
  (gnu:system:accounts:user-account
    (name                 name)
    (password             deployment:users:initial-password)
    (group                "users")
    (supplementary-groups (list "wheel"))))