pushButtonF :: [(ModState, KeySym)] -> F a b -> F a (Either b Click)
pushButtonF keys fudget
pushButtonF
creates a push button. An argument fudget determines what is displayed
inside the push button.
Left x
if the argument fudget outputs x
,
Right Click
when the button is clicked.
keys :: [(ModState, KeySym)]
fudget :: F a b