diff options
-rw-r--r-- | Plugins/PipeReader.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugins/PipeReader.hs b/Plugins/PipeReader.hs index a0709b1..3886ec6 100644 --- a/Plugins/PipeReader.hs +++ b/Plugins/PipeReader.hs @@ -23,6 +23,6 @@ data PipeReader = PipeReader String String instance Exec PipeReader where alias (PipeReader _ a) = a start (PipeReader p _) cb = do - h <- openFile p ReadMode + h <- openFile p ReadWriteMode forever (hGetLineSafe h >>= cb) where forever a = a >> forever a |