Browse Source

Bug fix: wrong indentation

addedsingle
Arthur Fayzrakhmanov (Артур Файзрахманов) 5 years ago
parent
commit
14f00fd263
  1. 12
      src/Transient/Move.hs

12
src/Transient/Move.hs

@ -644,12 +644,12 @@ mconnect node@Node{} =
SBS.send sock "CLOS a b\n\n"
return conn
#else
getConnection _ h ev p =
do ws <- connectToWS h (PortNumber $ fromIntegral p)
defConnection >>= \c ->
return c { comEvent = ev
, connData = Just (Web2Node ws)
}
getConnection _ h ev p =
do ws <- connectToWS h (PortNumber $ fromIntegral p)
defConnection >>= \c ->
return c { comEvent = ev
, connData = Just (Web2Node ws)
}
#endif

Loading…
Cancel
Save