reflex-process 0.2.0.0 → 0.2.1.0
raw patch · 3 files changed
+14/−9 lines, 3 files
Files
- ChangeLog.md +4/−0
- reflex-process.cabal +1/−1
- src/Reflex/Process.hs +9/−8
ChangeLog.md view
@@ -1,5 +1,9 @@ # Revision history for reflex-process +## 0.2.1.0++* `createProcess`: Ensure that handle is open before attempting to check whether it is readable+ ## 0.2.0.0 * Breaking change: Generalise input and output parameters of createRedirectedProcess. Existing programs should replace `Process t` with `Process t ByteString ByteString` and `ProcessConfig t` with `ProcessConfig t ByteString`.
reflex-process.cabal view
@@ -1,6 +1,6 @@ cabal-version: >=1.10 name: reflex-process-version: 0.2.0.0+version: 0.2.1.0 synopsis: reflex-frp interface for running shell commands description: Run shell commands from within reflex applications and interact with them over a functional-reactive interface bug-reports: https://github.com/reflex-frp/reflex-process/issues
src/Reflex/Process.hs view
@@ -141,12 +141,13 @@ H.hSetBuffering h H.LineBuffering let go = do open <- H.hIsOpen h- readable <- H.hIsReadable h- when (open && readable) $ do- out <- BS.hGetSome h 32768- if BS.null out- then return ()- else do- void $ trigger out- go+ when open $ do+ readable <- H.hIsReadable h+ when readable $ do+ out <- BS.hGetSome h 32768+ if BS.null out+ then return ()+ else do+ void $ trigger out+ go return go