"Diogo F. S. Ramos" <[email protected]> writes:
>> I'm still interested :) I really need to do something about some of the
>> modules that we're hosting anyway (swm-emacs for sure). A number of
>> them have horrible bitrot. If your working on anything I'm very
>> interested to know!
>
> It is in the Wiki.
>
> It is a very simple module to do some primitive control of pulseaudio.
Actually this would be very useful to me, I currently use a very hackish
way of controlling pulse audio's volume with these in my stumpwmrc:
(defcommand vol-up () ()
"Increase the volume from the shell"
(run-shell-command
"pacmd set-sink-volume 0 $(printf '0x%x' $(( $(pacmd dump|grep
set-sink-volume|cut -f3 -d' ') + 0xf00)) ) &> /dev/null"))
(defcommand vol-down () ()
"Decrease the volume from the shell"
(run-shell-command
"pacmd set-sink-volume 0 $(printf '0x%x' $(( $(pacmd dump|grep
set-sink-volume|cut -f3 -d' ') - 0xf00)) ) &> /dev/null"))
A more lispy solution would be really awesome!
Dave
_______________________________________________
Stumpwm-devel mailing list
[email protected]
https://lists.nongnu.org/mailman/listinfo/stumpwm-devel
