From 8b31e425fa9e462dc7ca24020a932547a8934d98 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Fri, 12 Dec 2025 23:43:25 +0100 Subject: systems: export default label generation to (sovereign systems) It is not possible to otherwise construct a nice-looking definition of a system label. That is because of a restriction by a lexical scope requirement. The gnu:system:operating-system-default-label funciton is instead called in (sovereign systems) module. * deployment/systems/aisaka.scm (operating-system): do this. * deployment/systems/akashi.scm (operating-system): do this. * deployment/systems/asakura.scm (operating-system): do this. * deployment/systems/cokolwiek.scm (operating-system): do this. * deployment/systems/mcdowell.scm (operating-system): do this. * deployment/systems/rakan.scm (operating-system): do this. --- deployment/systems/asakura.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'deployment/systems/asakura.scm') diff --git a/deployment/systems/asakura.scm b/deployment/systems/asakura.scm index bc00308..4571f83 100644 --- a/deployment/systems/asakura.scm +++ b/deployment/systems/asakura.scm @@ -120,7 +120,7 @@ (kernel nongnu:packages:linux:linux) (bootloader (bootloader)) (label (sovereign:systems:operating-system-label* host-name - (gnu:system:operating-system-default-label gnu:system:this-operating-system))) + gnu:system:this-operating-system)) (keyboard-layout keyboard-layout) (initrd nongnu:system:linux-initrd:microcode-initrd) (firmware (list nongnu:packages:linux:linux-firmware)) -- cgit v1.2.3