diff options
Diffstat (limited to 'deployment')
| -rw-r--r-- | deployment/machine/ssh.scm | 2 | ||||
| -rw-r--r-- | deployment/system.scm | 4 | ||||
| -rw-r--r-- | deployment/system/aisaka.scm | 7 |
3 files changed, 8 insertions, 5 deletions
diff --git a/deployment/machine/ssh.scm b/deployment/machine/ssh.scm index 09d05b3..f0dd2bc 100644 --- a/deployment/machine/ssh.scm +++ b/deployment/machine/ssh.scm @@ -34,7 +34,7 @@ (define-public aisaka-configuration (gnu:machine:ssh:machine-ssh-configuration - (host-name deployment:system:aisaka:system-name) + (host-name deployment:system:aisaka:host-name-aisaka) (system sovereign:machine:system-x86-linux) (build-locally? #t) (authorize? #t) diff --git a/deployment/system.scm b/deployment/system.scm index ea7e6af..766d4d0 100644 --- a/deployment/system.scm +++ b/deployment/system.scm @@ -91,13 +91,13 @@ (kernel-arguments gnu:system:%default-kernel-arguments) (hurd #f) (bootloader sovereign:devices:amd64:custom-bootloader-configuration) - (label (sovereign:systems:operating-system-label* deployment:system:aisaka:system-name + (label (sovereign:systems:operating-system-label* deployment:system:aisaka:host-name-aisaka gnu:system:this-operating-system)) (keyboard-layout deployment:system:aisaka:system-keyboard-layout) (initrd nongnu:system:linux-initrd:microcode-initrd) (initrd-modules gnu:system:linux-initrd:%base-initrd-modules) (firmware (list nongnu:packages:linux:linux-firmware)) - (host-name deployment:system:aisaka:system-name) + (host-name deployment:system:aisaka:host-name-aisaka) (hosts-file #f) (mapped-devices (list)) (file-systems (cons* deployment:system:aisaka:file-system-root diff --git a/deployment/system/aisaka.scm b/deployment/system/aisaka.scm index 7f0f43a..b168f35 100644 --- a/deployment/system/aisaka.scm +++ b/deployment/system/aisaka.scm @@ -19,6 +19,7 @@ ;;; If not, see <https://www.gnu.org/licenses/>. (define-module (deployment system aisaka) + #:export (host-name-aisaka) #:use-module (guix gexp) #:use-module ((deployment gexp) #:prefix deployment:gexp:) @@ -83,8 +84,6 @@ #:use-module ((users vmail) #:prefix users:vmail:)) -(define-public system-name "aisaka") - (define radicale-keys "/secrets/radicale/keys") (define dovecot-keys "/secrets/dovecot") @@ -347,3 +346,7 @@ (define-public guix-publish-service (sovereign:services:guix-publish-service guix-publish-configuration)) + +(define host-name-aisaka "aisaka") + +;;; EOF |