fixed weird bug with not consuming pipe

This commit is contained in:
Rachel Lambda Samuelsson 2022-03-14 16:19:19 +01:00
parent d01d2b3b0f
commit 98e7894113

View File

@ -83,6 +83,6 @@ ytdl url res = ReaderT $ \cfg -> do
(pure . Left) "An unknown error prevented the output file from being created" (pure . Left) "An unknown error prevented the output file from being created"
(ExitFailure status) -> (ExitFailure status) ->
pure . Left $ "execution failed with status " ++ show status ++ ": " ++ err pure . Left $ "execution failed with status " ++ show status ++ ": " ++ out ++ ", " ++ err
_ -> (pure . Left) "Unable to create ytdlProcess for downloading video" _ -> (pure . Left) "Unable to create ytdlProcess for downloading video"