Change messages.
parent
46de4c6026
commit
fc24bdac68
|
@ -317,16 +317,16 @@ handleAction = case _ of
|
|||
unableToSend "Not connected to server."
|
||||
|
||||
Just _, "", _, _, _ ->
|
||||
unableToSend "Write your secret key!"
|
||||
unableToSend "Write the secret key with authd!"
|
||||
|
||||
Just _, _, "", _, _ ->
|
||||
unableToSend "Write your login!"
|
||||
unableToSend "Write the user's login!"
|
||||
|
||||
Just _, _, _, "", _ ->
|
||||
unableToSend "Write your email!"
|
||||
unableToSend "Write the user's email!"
|
||||
|
||||
Just _, _, _, _, "" ->
|
||||
unableToSend "Write your password!"
|
||||
unableToSend "Write the user's password!"
|
||||
|
||||
Just webSocket, _, _, _, _ -> do
|
||||
H.liftEffect (WS.readyState webSocket) >>= case _ of
|
||||
|
@ -412,8 +412,8 @@ handleAction = case _ of
|
|||
, "]"
|
||||
]
|
||||
|
||||
sendArrayBuffer :: WS.WebSocket -> ArrayBuffer -> Effect Unit
|
||||
sendArrayBuffer = WS.sendArrayBuffer
|
||||
sendArrayBuffer :: WS.WebSocket -> ArrayBuffer -> Effect Unit
|
||||
sendArrayBuffer = WS.sendArrayBuffer
|
||||
|
||||
--------------------------------------------------------------------------------
|
||||
-- Helpers for updating the array of messages sent/received
|
||||
|
|
Loading…
Reference in New Issue