aboutsummaryrefslogtreecommitdiff
path: root/tw/gexp.scm
diff options
context:
space:
mode:
authorTimo Wilken2024-07-11 17:11:25 +0200
committerTimo Wilken2024-07-11 17:11:25 +0200
commite6f26581bf22e266c5056eddfb264eca2efb6ef4 (patch)
tree08c436f4b5d4fe66bbf9b6a67bb1020568737e93 /tw/gexp.scm
parentc2c6421d3f8db9920fe50f07eff226641586f87a (diff)
Wayland-based desktop support
Add a separate home service to configure a Wayland-based desktop instead of an X11 one. Screensharing in Zoom doesn't work unfortunately, but it worked (at least for a while) through OBS. Waybar might need some work to bring it in line with the previous polybar configuration, especially in terms of aesthetics.
Diffstat (limited to 'tw/gexp.scm')
-rw-r--r--tw/gexp.scm9
1 files changed, 9 insertions, 0 deletions
diff --git a/tw/gexp.scm b/tw/gexp.scm
index 2f1705b7..0770f250 100644
--- a/tw/gexp.scm
+++ b/tw/gexp.scm
@@ -1,4 +1,5 @@
(define-module (tw gexp)
+ #:use-module (gnu packages guile)
#:use-module (guix gexp)
#:use-module (guix modules))
@@ -19,3 +20,11 @@
(lambda (iport)
(dump-port iport oport))))
'#$files)))))))
+
+(define-public (json-file name value)
+ (computed-file name
+ (with-extensions (list guile-json-4)
+ #~(begin
+ (use-modules (json) (srfi srfi-26))
+ (call-with-output-file #$output
+ (cut scm->json '#$value <> #:unicode #t))))))