M home/home-configuration.scm => home/home-configuration.scm +21 -5
@@ 11,6 11,7 @@
(gnu packages gnupg)
(gnu packages emacs)
(gnu packages shellutils)
+ (gnu packages freedesktop)
(gnu services)
(gnu home services fontutils)
(gnu home services desktop)
@@ 23,6 24,7 @@
(ruther home dwl scripts)
(ruther home themes)
(ruther home services gtk)
+ (ruther home services xdg-desktop-portals)
(ruther home services wayland)
(ruther home services kanshi))
@@ 35,6 37,7 @@
dwl-mine)
(specifications->packages
(list
+ "slurp"
;; HW interactions
"pavucontrol"
@@ 258,6 261,23 @@
(position '(1920 . 0))
(enable #t)))))))))))
+ (service home-xdg-desktop-portal-service-type
+ (xdg-desktop-portal-configuration
+ (implementations
+ (list
+ xdg-desktop-portal-gtk
+ xdg-desktop-portal-wlr))
+ (configs
+ (list
+ (xdg-desktop-portals-conf
+ (name "wlroots")
+ (config
+ '((preferred ((default . gtk)
+ (org.freedesktop.impl.portal.ScreenCast . wlr)
+ (org.freedesktop.impl.portal.Screenshot . wlr)
+ ;; https://github.com/labwc/labwc/discussions/1503
+ (org.freedesktop.impl.portal.Inhibit . none))))))))))
+
(service home-gpg-agent-service-type
(home-gpg-agent-configuration
(pinentry-program
@@ 265,8 285,4 @@
(service home-pipewire-service-type)
(service home-dbus-service-type))))
-;; dwl package the scripts for starting, make them in Guile
-
-;; xdg desktop portal, wlr
-
-;; redshift equivalent
+;; swayidle
M home/modules/ruther/home/dwl/scripts.scm => home/modules/ruther/home/dwl/scripts.scm +1 -0
@@ 190,6 190,7 @@
(spawn (string-append #$dbus "/bin/dbus-update-activation-environment")
'("dbus-update-activation-environment"
+ "XDG_DESKTOP_PORTAL_DIR"
"WAYLAND_DISPLAY"
"XDG_CURRENT_DESKTOP"
"DISPLAY"))