The button generated by >>| should always be enabled
When running the following program, the continue button is disabled until the user selects a value in the drop-down box. As the selected value is ignored by the >>| combinator the button should always be enabled.
module Main
import iTasks
Start world = startEngine main world
main = enterChoice () [] [1,2,3] >>| viewInformation "hello" [] "world"
The implementation of >>| should be:
(>>|) taskA taskB = step taskA (const Nothing)
[ OnAction ActionContinue (const $ Just taskB)
, OnValue (ifStable $ const taskB)
]