-allmTasks = 'DM'.fromList [
- ("countAndLed", treturn countAndLed),
- ("ledOn", ledSelection @ ledtOn),
- ("ledOff", ledSelection @ ledtOff),
- ("blink", ledSelection @ blink)]
+allmTasks = 'DM'.fromList
+ [("countAndLed", treturn countAndLed)
+ ,("ledOn", ledSelection @ ledtOn)
+ ,("ledOff", ledSelection @ ledtOff)
+ ,("blink", ledSelection @ blink)
+ ,("blinkShare", treturn blinkShare)
+ ]