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)