1 files changed, 41 insertions, 0 deletions
diff --git a/crn/system/desktop.scm b/crn/system/desktop.scm
new file mode 100644
index 0000000..234389c
--- /dev/null
+++ b/crn/system/desktop.scm
@@ -0,0 +1,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")))