summaryrefslogtreecommitdiff
path: root/deployment/system/cokolwiek.scm
diff options
context:
space:
mode:
authorMarek Paśnikowski <marek@marekpasnikowski.pl>2026-05-25 21:45:31 +0200
committerMarek Paśnikowski <marek@marekpasnikowski.pl>2026-05-25 22:31:17 +0200
commite31bad8b571ee0e45df55d98b7a9204f238f3d24 (patch)
tree36895638f25f6853af26d04cd6a089071c30daa0 /deployment/system/cokolwiek.scm
parentf95da292d5a3326e04d62eb5e855c9a6754383ef (diff)
adapt to removal of pl-keyboard-layout in Sovereign
Diffstat (limited to 'deployment/system/cokolwiek.scm')
-rw-r--r--deployment/system/cokolwiek.scm18
1 files changed, 9 insertions, 9 deletions
diff --git a/deployment/system/cokolwiek.scm b/deployment/system/cokolwiek.scm
index 14587e9..073f43a 100644
--- a/deployment/system/cokolwiek.scm
+++ b/deployment/system/cokolwiek.scm
@@ -42,10 +42,10 @@
#:prefix nongnu:system:linux-initrd:)
#:use-module ( (sovereign channels)
#:prefix sovereign:channels:)
- #:use-module ( (sovereign devices)
- #:prefix sovereign:devices:)
#:use-module ( (sovereign packages protonmail)
#:prefix sovereign:packages:protonmail:)
+ #:use-module ( (sovereign system file-systems)
+ #:prefix sovereign:system:file-systems:)
#:use-module ( (sovereign systems)
#:prefix sovereign:systems:)
#:use-module ( (users id1000)
@@ -59,25 +59,25 @@
(define file-system-efi
(let*
( (l-system-name (string-upcase system-name))
- (l-device (sovereign:devices:file-system-label "BOOT")))
+ (l-device (sovereign:system:file-systems:file-system-label "BOOT")))
(gnu:system:file-systems:file-system
- (inherit sovereign:devices:file-system/efi)
+ (inherit sovereign:system:file-systems:file-system/efi)
(device l-device))))
(define file-system-root
(let
- ( (l-device (sovereign:devices:file-system-label system-name
+ ( (l-device (sovereign:system:file-systems:file-system-label system-name
"root")))
(gnu:system:file-systems:file-system
- (inherit sovereign:devices:file-system/root)
+ (inherit sovereign:system:file-systems:file-system/root)
(device l-device))))
(define swap
(let
- ( (l-target (sovereign:devices:file-system-label system-name
+ ( (l-target (sovereign:system:file-systems:file-system-label system-name
"swap")))
(gnu:system:file-systems:swap-space
- (inherit sovereign:devices:swap/no-trim)
+ (inherit sovereign:system:file-systems:swap/no-trim)
(target l-target))))
(define-public system
@@ -104,7 +104,7 @@
(bootloader l-bootloader)
(label (sovereign:systems:operating-system-label* system-name
gnu:system:this-operating-system))
- (keyboard-layout sovereign:devices:pl-keyboard-layout)
+ (keyboard-layout sovereign:systems:keyboard-layout)
(initrd nongnu:system:linux-initrd:microcode-initrd)
(initrd-modules l-initrd-modules)
(firmware l-firmware)