template createListenerEvent(data: typed, stateType: typedesc):
ApplicationEvent =
  proc(state: WidgetState) =
    let state = stateType(state)
    addServerListener(state, data)