stumpwm/sound.lisp @ 4673e928c08e
Split Stump config
| author | Steve Losh <steve@stevelosh.com> |
|---|---|
| date | Tue, 19 Mar 2024 13:55:42 -0400 |
| parents | (none) |
| children | ea681bd9c52d |
(in-package :stumpwm-user) (defcommand mute () () (run-shell-command "mute") (echo "Muted.")) (defcommand volume-up () () (run-shell-command "amixer -q sset Master 5%+") (message "Volume: ~D%" (volume))) (defcommand volume-down () () (run-shell-command "amixer -q sset Master 5%-") (message "Volume: ~D%" (volume)))