diff options
Diffstat (limited to 'sigils/home')
-rw-r--r-- | sigils/home/services/hyprland.scm | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/sigils/home/services/hyprland.scm b/sigils/home/services/hyprland.scm index 2b489d6..5380160 100644 --- a/sigils/home/services/hyprland.scm +++ b/sigils/home/services/hyprland.scm @@ -63,6 +63,8 @@ (apply string-append (map serialize-config var))) +;;; Hyprland + (define %default-hyprland-config '(($terminal kitty) ($fileManager 'dolphin) @@ -214,6 +216,7 @@ (default-value (home-hyprland-configuration)) (description "Configure Hyprland by providing @file{~/.config/hypr/hyprland.conf}"))) +;;; Hyprpaper (define-configuration/no-serialization home-hyprpaper-configuration (config @@ -237,3 +240,28 @@ (compose identity) (default-value (home-hyprpaper-configuration)) (description "Configure Hyprpaper by providing @file{~/.config/hypr/hyprpaper.conf}"))) + +;;; Hyprlock + +(define-configuration/no-serialization home-hyprlock-configuration + (config + (hypr-config '()) + "Hyprlock configuration")) + +(define (hyprlock-configuration->file config) + `(("hypr/hyprlock.conf" + ,(mixed-text-file + "hyprlock-config" + (serialize-hypr-config + (home-hyprlock-configuration-config config)))))) + +(define home-hyprlock-service-type + (service-type + (name 'home-hyprlock) + (extensions + (list (service-extension + home-xdg-configuration-files-service-type + hyprlock-configuration->file))) + (compose identity) + (default-value (home-hyprlock-configuration)) + (description "Configure Hyprlock by providing @file{~/.config/hypr/hyprlock.conf}"))) |