summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarek Paśnikowski <marek@marekpasnikowski.pl>2024-10-01 00:50:47 +0200
committerMarek Paśnikowski <marek@marekpasnikowski.pl>2024-10-01 00:50:47 +0200
commit2ee866228ce66170c3a546a4a566ccaec92f9af8 (patch)
tree2254b52bb3b73833c211b394b71299d8780bf6ba
parentd64a4fd72808223ce0a883318a3ea106c1008b29 (diff)
refactor(users): drop user id1001
-rw-r--r--users/id1001.scm45
1 files changed, 0 insertions, 45 deletions
diff --git a/users/id1001.scm b/users/id1001.scm
deleted file mode 100644
index 26a76f6..0000000
--- a/users/id1001.scm
+++ /dev/null
@@ -1,45 +0,0 @@
-(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*)))))