Commit ae2c29a5 authored by Brandon Invergo's avatar Brandon Invergo

Simplify AK1 Ardour example.

parent 3ebe1b60
......@@ -41,12 +41,11 @@
#:pos-mod-keys (list key-leftshift)
#:knob-max (ak1:knob-max)
#:invert #t))
#:idle-wait 0.5
#:idle-hooks (list (lambda ()
(set-ctl (control-alsa-ctl ak1:knob) #f)))
#:exit-hooks (list (lambda ()
#:init (list (lambda ()
(turn-off-ctls
(map control-alsa-ctl
(list ak1:left ak1:middle ak1:right ak1:knob))))))
(list ak1:left ak1:middle ak1:right ak1:knob)))))
#:exit-hooks (list (lambda ()
(set-ctl (control-alsa-ctl ak1:middle) #f))))
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment