diff options
| author | Sisiutl <sisiutl@egregore.fun> | 2025-01-23 15:54:56 +0100 |
|---|---|---|
| committer | Sisiutl <sisiutl@egregore.fun> | 2025-01-23 15:54:56 +0100 |
| commit | dd38da3e6f4db7b896fd0ed884d4c5af83192bba (patch) | |
| tree | 11ea65eb2ddc139a09394cd8fd95118898f5d935 | |
| parent | 682c77a807e8dee3f3092608fae3704db57bf074 (diff) | |
remove idiotic symbol->string, color codes should be STRINGS
| -rw-r--r-- | sigils/home/services/hyprland.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/sigils/home/services/hyprland.scm b/sigils/home/services/hyprland.scm index 3db3e97..eb6d270 100644 --- a/sigils/home/services/hyprland.scm +++ b/sigils/home/services/hyprland.scm @@ -35,8 +35,8 @@ (define (serialize-term term) (match term - (('rgba color) (list (format #f "rgba(~a)" (symbol->string color)))) - (('rgb color) (list (format #f "rgb(~a)" (symbol->string color)))) + (('rgba color) (list (format #f "rgba(~a)" color))) + (('rgb color) (list (format #f "rgb(~a)" color))) ;; I'd say it's not the most elegant way. (('rgba r g b a) (list (format #f "rgba(~a, ~a, ~a, ~a)" r g b a))) (('rgb r g b) (list (format #f "rgb(~a, ~a, ~a)" r g b))) |