halogen-websocket-ipc-playzone/drop/APIStuff.purs

4 lines
161 B
Plaintext
Raw Normal View History

2024-02-20 17:52:26 +01:00
maybeCurrentConnection <- H.gets _.wsInfo.connection
when (isJust maybeCurrentConnection) do
H.modify_ _ { wsInfo { connection = Nothing, reconnect = true } }