maybeCurrentConnection <- H.gets _.wsInfo.connection
when (isJust maybeCurrentConnection) do
  H.modify_ _ { wsInfo { connection = Nothing, reconnect = true } }