almost works, why is OnClick in IO monad and not Client?