Skip to content

Commit ad319b2

Browse files
Fix encoding
Otherwise I get: ``` TypeError [ERR_UNKNOWN_ENCODING]: Unknown encoding: UTF8 {} ```
1 parent d35c583 commit ad319b2

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

src/Node/Net/Socket.purs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -68,7 +68,7 @@ import Effect.Exception (Error)
6868
import Effect.Uncurried (EffectFn1, EffectFn2, EffectFn3, EffectFn4, mkEffectFn1, mkEffectFn4, runEffectFn1, runEffectFn2, runEffectFn3, runEffectFn4)
6969
import Foreign (Foreign)
7070
import Node.Buffer (Buffer)
71-
import Node.Encoding (Encoding)
71+
import Node.Encoding (Encoding, encodingToNode)
7272
import Node.FS (FileDescriptor)
7373

7474
-- | Options to configure the connecting side of a `Socket`.
@@ -469,7 +469,7 @@ foreign import writeImpl :: EffectFn3 Socket Buffer (Effect Unit) Boolean
469469
write :: Socket -> Buffer -> Effect Unit -> Effect Boolean
470470
write socket buffer callback = runEffectFn3 writeImpl socket buffer callback
471471

472-
foreign import writeStringImpl :: EffectFn4 Socket String Encoding (Effect Unit) Boolean
472+
foreign import writeStringImpl :: EffectFn4 Socket String String (Effect Unit) Boolean
473473

474474
-- | Sends data on the `Socket` and invokes the callback after the data is
475475
-- | finally written.
@@ -478,4 +478,4 @@ foreign import writeStringImpl :: EffectFn4 Socket String Encoding (Effect Unit)
478478
-- | Emits a `'drain'` event after the buffer is free.
479479
writeString :: Socket -> String -> Encoding -> Effect Unit -> Effect Boolean
480480
writeString socket str encoding callback =
481-
runEffectFn4 writeStringImpl socket str encoding callback
481+
runEffectFn4 writeStringImpl socket str (encodingToNode encoding) callback

0 commit comments

Comments
 (0)