updated the lab-tool to use correct keys

This commit is contained in:
Geir Okkenhaug Jerstad 2025-07-03 23:09:43 +02:00
parent 62fabf835d
commit f0a93f457e
2 changed files with 8 additions and 5 deletions

View file

@ -24,10 +24,11 @@
(define (get-ssh-config machine-name)
"Get SSH configuration for a machine"
`((hostname . ,(symbol->string machine-name))
(user . "sma")
(identity-file . "~/.ssh/id_ed25519_admin")
(is-local . #f)))
(let ((hostname (symbol->string machine-name)))
`((hostname . ,hostname)
(user . "sma")
(identity-file . "~/.ssh/id_ed25519_admin")
(is-local . #f)))
(define (get-homelab-root)
"Get home lab root directory"

View file

@ -141,4 +141,6 @@
#f))
(begin
(log-error "Cannot establish SSH connection to ~a" machine-name)
#f)))
#f))))
;; Ensure file ends with a newline and all parentheses are closed