blob: 501910223a455db6ad3370dfaafe715ab5875e3d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
(define-module (suweren system)
#:use-module (gnu system locale)
#:use-module (gnu system file-systems) ; %base-file-systems
#:use-module (gnu system shadow)) ; %base-user-accounts)
(define-public polish-locale-string
"pl_PL.utf8")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define polish-locale
(locale-definition (name polish-locale-string)
(source "pl_PL")))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define (locale-definitions*)
(append %default-locale-definitions
(list polish-locale)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define-public %suweren-bootloader
#f)
(define-public %suweren-file-systems
%base-file-systems)
(define-public %suweren-locale-definitions
(locale-definitions*))
(define-public %suweren-users
%base-user-accounts)
|
