method
add_action a = actions <- [a]@actions