karchnu
/
halogen-websocket-ipc-playzone
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Change messages.

master
Philippe Pittoli 2023-06-09 02:54:57 +02:00
parent 46de4c6026
commit fc24bdac68
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/App/AuthenticationDaemonAdminInterface.purs
View File

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