From 79d055455ab4117832375887839be9d80062b92a Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Mon, 20 Mar 2023 11:07:41 -0300 Subject: system.scm: Derive SSH key name from tld --- src/infrastructure/guix/system.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/infrastructure/guix/system.scm b/src/infrastructure/guix/system.scm index ed34f75..e579253 100644 --- a/src/infrastructure/guix/system.scm +++ b/src/infrastructure/guix/system.scm @@ -411,7 +411,7 @@ (simple-service 'extra-etc-file etc-service-type `(("rc" ,(plain-file "rc.sh" (file "src/infrastructure/config/rc.sh"))) ("known_hosts" ,(plain-file "known_hosts" (file "src/infrastructure/config/known_hosts.txt"))) - ("id_rsa.pub" ,(plain-file "id_rsa.pub" (file "src/infrastructure/keys/SSH/root@euandre.org.id_rsa.pub.stripped"))) + ("id_rsa.pub" ,(plain-file "id_rsa.pub" (file (fmt "src/infrastructure/keys/SSH/root@~a.id_rsa.pub.stripped" tld)))) ("ssh.conf" ,(plain-file "ssh.conf" (file "src/infrastructure/config/ssh.conf"))) ("init.scm" ,(plain-file "init.scm" (file "src/infrastructure/config/init.scm"))) ("gitconfig" ,(plain-file "gitconfig" (file "src/infrastructure/config/gitconfig"))))) -- cgit v1.2.3