aboutsummaryrefslogtreecommitdiff
path: root/crn/system/desktop.scm
blob: 234389c32f24bc627413736850a6793c3cd9e277 (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
(define-module (system desktop)
  #:export (desktop-services)
  #:export (desktop-packages))

(use-modules (system base)
             (gnu)
             (gnu system)
             (gnu services))
(use-package-modules wm)
(use-service-modules avahi desktop networking nfs xorg)

(define desktop-services
  (list
   (service autofs-service-type
            (autofs-configuration
             (use-hostname-for-mounts? #t)
             (mount-nfs-default-protocol 4)
             (mounts
              (list
               (autofs-indirect-map
                (mount-point "/media/houston")
                (entries
                 (list
                  (autofs-map-entry
                   (type "nfs")
                   (device "houston:/exports/&")
                   (mount-point "*")))))))))
   (service cups-service-type
            (cups-configuration
             (web-interface? #t)))
   (service elogind-service-type)
   (service screen-locker-service-type
            (screen-locker-configuration
             (name "swaylock")
             (program (file-append swaylock "/bin/swaylock"))
             (using-pam? #t)
             (using-setuid? #f)))))

(define desktop-packages
  (specifications->packages '("sway" "wl-clipboard"
                              "neovim")))