blob: e97a9f3e8ed81292c11cf2e8f6aebc93eeaf435e (
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
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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
(use-modules (gnu)
(guix packages)
(guix git-download)
(gnu system)
(gnu services)
(guix gexp)
(srfi srfi-1))
(use-package-modules
bootloaders certs
emacs
terminals
wm xdisorg shells admin
version-control
nss)
(use-service-modules desktop
base)
(operating-system
(host-name "surltesh-echer")
(timezone "Europe/Paris")
(locale "en_US.utf8")
;; Use the UEFI variant of GRUB with the EFI System
;; Partition mounted on /boot/efi.
(bootloader (bootloader-configuration
(bootloader grub-bootloader)
(targets '("/dev/sda"))))
;; Assume the target root file system is labelled "my-root",
;; and the EFI System Partition has UUID 1234-ABCD.
(file-systems (append
(list (file-system
(device "/dev/sda1")
(mount-point "/")
(type "ext4")))
%base-file-systems))
(users (cons (user-account
(name "stuebinm")
(group "users")
(supplementary-groups '("wheel" "netdev"
"audio" "video"))
(shell (file-append fish "/bin/fish")))
%base-user-accounts))
;; Add a bunch of window managers; we can choose one at
;; the log-in screen with F1.
(packages (append (list
;; window managers
hikari
emacs kitty fuzzel git
fish
;; for HTTPS access
nss-certs)
%base-packages))
;; Use the "desktop" services, which include the X11
;; log-in service, networking with NetworkManager, and more.
(services
(append (modify-services
%desktop-services
(delete mingetty-service-type))
(list
(service greetd-service-type
(greetd-configuration
(terminals
(list
(greetd-terminal-configuration
(terminal-vt "1")
(terminal-switch #t)
(default-session-command
(greetd-agreety-session
(command (file-append hikari "/bin/hikari"))
(command-args '("-c" "hikari.conf"))
))
)))))
(service mingetty-service-type
(mingetty-configuration (tty "tty2")))
(service mingetty-service-type
(mingetty-configuration (tty "tty3")))
(service mingetty-service-type
(mingetty-configuration (tty "tty4")))
(service mingetty-service-type
(mingetty-configuration (tty "tty5")))
(service mingetty-service-type
(mingetty-configuration (tty "tty6")))
(service mingetty-service-type
(mingetty-configuration (tty "tty7")))
(service mingetty-service-type
(mingetty-configuration (tty "tty8")))
)))
;; Allow resolution of '.local' host names with mDNS.
(name-service-switch %mdns-host-lookup-nss))
|
