-record(button, {text :: binary(), key :: shore@key:key(), event :: any()}).