From 56e35c36520946a8e78a84f5e503f1fc2d5eae94 Mon Sep 17 00:00:00 2001
From: Collin J. Doering
Date: Mon, 27 May 2024 07:47:02 -0400
Subject: balg02: Add new users, and ssh keys for Arun and Pjotr

---
 .guix/guix-na/config/balg02.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

(limited to '.guix/guix-na/config/balg02.scm')

diff --git a/.guix/guix-na/config/balg02.scm b/.guix/guix-na/config/balg02.scm
index 55a9521..24e956f 100644
--- a/.guix/guix-na/config/balg02.scm
+++ b/.guix/guix-na/config/balg02.scm
@@ -83,6 +83,14 @@
                   (supplementary-groups
                    '("wheel"))
                   (home-directory "/home/auto"))
+                 (user-account
+                  (name "arun")
+                  (comment "Admin user")
+                  (group "users")
+	          (shell #~(string-append #$zsh "/bin/zsh"))
+                  (supplementary-groups
+                   '("wheel"))
+                  (home-directory "/home/arun"))
                  (user-account
                   (name "collin")
                   (comment "Admin user")
@@ -91,6 +99,14 @@
                   (supplementary-groups
                    '("wheel"))
                   (home-directory "/home/collin"))
+                 (user-account
+                  (name "pjotr")
+                  (comment "Admin user")
+                  (group "users")
+	          (shell #~(string-append #$zsh "/bin/zsh"))
+                  (supplementary-groups
+                   '("wheel"))
+                  (home-directory "/home/pjotr"))
                  %base-user-accounts))
 
    (packages
@@ -113,7 +129,13 @@
                 (allow-agent-forwarding? #t)
 		(authorized-keys
 		 `(("auto" ,(local-file "../../../.pubkeys/deploy-key.pub"))
+                   ("arun" ,(local-file "../../../.pubkeys/arun.pub"))
                    ("collin" ,(local-file "../../../.pubkeys/collin.pub"))
+                   ("pjotr"
+                    ,(local-file "../../../.pubkeys/pjotr-gaeta.pub")
+                    ,(local-file "../../../.pubkeys/pjotr-napoli.pub")
+                    ,(local-file "../../../.pubkeys/pjotr-stromboli.pub")
+                    ,(local-file "../../../.pubkeys/pjotr-tb-arm-01.pub"))
 		   ("root" ,(local-file "../../../.pubkeys/collin.pub"))))))
       (service static-networking-service-type
                (list (static-networking
-- 
cgit v1.2.3