summaryrefslogtreecommitdiffstats
path: root/src/Flameshot/Internal
diff options
context:
space:
mode:
authortv <tv@krebsco.de>2020-05-01 09:44:54 +0200
committertv <tv@krebsco.de>2020-05-01 09:46:01 +0200
commite91de0e9ac597f3aa1bda0692b6ca5b969fdbe5d (patch)
treeaa830e0921bc01a9e05ddafffb8296391c2e5a1a /src/Flameshot/Internal
parent59346062401f7ce7ade53d1f45128cb0a76341b4 (diff)
Flameshot.Internal.Process.run: input bytestrings
Diffstat (limited to 'src/Flameshot/Internal')
-rw-r--r--src/Flameshot/Internal/Process.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Flameshot/Internal/Process.hs b/src/Flameshot/Internal/Process.hs
index e38a145..31e2fee 100644
--- a/src/Flameshot/Internal/Process.hs
+++ b/src/Flameshot/Internal/Process.hs
@@ -15,7 +15,7 @@ import Data.Text (Text)
import qualified Data.Text.IO as T
import System.Exit
import System.IO (BufferMode(LineBuffering),hSetBuffering)
-import System.IO (Handle,hClose,hPutStr,hIsEOF)
+import System.IO (Handle,hClose,hIsEOF)
import System.IO.Error (catchIOError,isDoesNotExistError)
import System.Process
import System.Posix.Directory (changeWorkingDirectory)
@@ -74,7 +74,7 @@ run :: FilePath
-> [String]
-> Maybe FilePath
-> Maybe [(String, String)]
- -> String
+ -> ByteString
-> Maybe Int
-> Callbacks
-> IO ()
@@ -88,7 +88,7 @@ run path args cwd env input hTimeout Callbacks{..} =
onStart pid
mapM_ forkIO [
- hPutStr inh input `finally` hClose inh,
+ BS.hPutStr inh input `finally` hClose inh,
hWithLines outh (onOutLine pid),
hWithLines errh (onErrLine pid)
]