From c988e6764e98c554ab71ea177d0483f7bfb4d8fe Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Thu, 13 Nov 2025 12:57:56 +0100 Subject: deployment: create (deployment keys) module * deployment/keys.scm: define a module. * deployment/keys.scm: define variables mcdowell-guix and rakan-guix. * deployment/systems/mcdowell.scm (guix-offload-rakan): use the new key definition at rakan-guix. * deployment/systems/rakan.scm (guix-offload-authorizations): use the new key definitions at mcdowell-guix. * keys/guix/mcdowell-signing-key.pub: remove the file. * keys/guix/rakan-signing-key.pub: remove the file. --- deployment/systems/mcdowell.scm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'deployment/systems/mcdowell.scm') diff --git a/deployment/systems/mcdowell.scm b/deployment/systems/mcdowell.scm index c238f48..7a5cc02 100644 --- a/deployment/systems/mcdowell.scm +++ b/deployment/systems/mcdowell.scm @@ -2,6 +2,8 @@ ;;; SPDX-FileCopyrightText: 2024-2025 Marek Paśnikowski (define-module (deployment systems mcdowell) + #:use-module ( (deployment keys) + #:prefix deployment:keys:) #:use-module ( (gnu packages package-management) #:prefix gnu:packages:package-management:) #:use-module ( (gnu services) @@ -75,11 +77,9 @@ (private-key "/home/marek/.ssh/id_ed25519"))) (define guix-offload-rakan - (let - ( (l-signing-key (local-file "../keys/guix/rakan-signing-key.pub"))) - (gnu:services:base:guix-extension - (authorized-keys (list l-signing-key)) - (build-machines (list rakan-machine))))) + (gnu:services:base:guix-extension + (authorized-keys (list deployment:keys:rakan-guix)) + (build-machines (list rakan-machine)))) (define system (let* -- cgit v1.2.3