blob: 6395991125e233c8b4a38bef9c91e02515d3551f (
plain) (
blame)
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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
;; This is an operating system configuration template
;; for a "desktop" setup with Plasma.
(use-modules (gnu) (gnu system nss) (srfi srfi-1))
(use-service-modules desktop sddm xorg ssh)
(use-package-modules certs gnome ssh admin fonts)
(use-package-modules qt xorg tmux linux)
(operating-system
(host-name "plasma")
(timezone "Asia/Shanghai")
(locale "en_US.utf8")
;; Assuming /dev/sdX is the target hard disk, and "my-root"
;; is the label of the target root file system.
(bootloader (bootloader-configuration
(bootloader grub-bootloader)
(targets (list "/dev/sdX"))))
(file-systems (cons (file-system
(device "my-root")
(mount-point "/")
(type "ext4"))
%base-file-systems))
(users (cons (user-account
(name "plasma")
(password (crypt "plasma" "$6$abc"))
(group "users")
(supplementary-groups '("wheel" "netdev"
"audio" "video")))
%base-user-accounts))
;; This is where we specify system-wide packages.
(packages (cons* nss-certs ;for HTTPS access
neofetch
htop
tmux
xprop
strace
%base-packages))
(services (cons*
;; for debug
;; (simple-service
;; 'add-qt-debug-env
;; session-environment-service-type
;; '(("QT_MESSAGE_PATTERN"
;; . "[[%{time process} %{type}] %{appname}: %{category} %{function} - %{message}]")
;; ("QT_DEBUG_PLUGINS" . "1")
;; ("QML_IMPORT_TRACE" . "1")))
(service openssh-service-type
(openssh-configuration
(openssh openssh-sans-x)
(port-number 2222)))
(service plasma-desktop-service-type)
(service sddm-service-type
(sddm-configuration
(theme "breeze")))
;; Remove GDM if it's among %DESKTOP-SERVICES; on other
;; architectures, %DESKTOP-SERVICES contains SDDM instead.
(remove (lambda (service)
(memq (service-kind service)
(list gdm-service-type sddm-service-type)))
%desktop-services)))
;; Allow resolution of '.local' host names with mDNS.
(name-service-switch %mdns-host-lookup-nss))
;; Local Variables:
;; mode: scheme
;; End:
|
