b161525bdc6f
Fix backlight
| author | Steve Losh <steve@stevelosh.com> | 
|---|---|
| date | Sat, 15 Jul 2023 23:18:46 -0400 | 
| parents | 3934552a572f | 
| children | e26a5b448f20 | 
| branches/tags | (none) | 
| files | stumpwmrc | 
Changes
--- a/stumpwmrc Sat Jul 15 23:07:58 2023 -0400 +++ b/stumpwmrc Sat Jul 15 23:18:46 2023 -0400 @@ -311,11 +311,9 @@ (defun set-brightness (value) (run-and-echo-shell-command (hostcase - ((:mobius) (format nil "xbacklight -set ~D" value)) - ((:papyrifera :alephnull) (format nil "xrandr --output ~A --brightness ~D" - (hostcase (:papyrifera "eDP") - (:alephnull "eDP-1")) - (/ value 100.0))) + ((:gro) (format nil "xrandr --output ~A --brightness ~D" + (hostcase (:gro "eDP")) + (/ value 100.0))) (t (message "Not sure how to set brightness on this machine."))))) (defun rotate-brightness (delta)