diff options
Diffstat (limited to 'users/id1000.scm')
| -rw-r--r-- | users/id1000.scm | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/users/id1000.scm b/users/id1000.scm index ba414b5..d92b05e 100644 --- a/users/id1000.scm +++ b/users/id1000.scm @@ -31,16 +31,22 @@ ;; %suweren-home-services #:use-module (suweren home)) +;; (list string) +(define groups + (list ;; "audio" + ;; "netdev" + ;; "video" + "wheel")) + ;; string (define-public uid1000-name "marek") -;; (string) -> -;; record user-account -(define-public (uid1000-account supplementary-groups*) +;; record* user-account +(define-public uid1000-account (user-account (name uid1000-name) (group "users") - (supplementary-groups supplementary-groups*) + (supplementary-groups groups) (uid 1000) (comment "Marek Paśnikowski") (home-directory "/home/marek"))) |