summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorjao <jao@pobox.com>2009-09-26 23:51:32 +0200
committerjao <jao@pobox.com>2009-09-26 23:51:32 +0200
commit36efb086430ba0c314d16b76870a68fa8b82a5f7 (patch)
tree0b375113a15d8f5ff21bea4f116fce565f95250d
parent474441acaf41cae531d6aa973d351a085eb10ed1 (diff)
downloadxmobar-36efb086430ba0c314d16b76870a68fa8b82a5f7.tar.gz
xmobar-36efb086430ba0c314d16b76870a68fa8b82a5f7.tar.bz2
Fix for PipeReader contents feching.
Ignore-this: d3362cb2b00c407b9ccc6adc97fdbf0d Apparently, a pipe has to be opened in r/w mode for xmobar to update the display of its contents when the latter changes in time. I don't see the reason for this, but the fact remains that opening the pipe in ReadMode does not work. darcs-hash:20090926215132-a9375-0b3384071129d6352493c959fbf078e3a9f58709.gz
-rw-r--r--Plugins/PipeReader.hs2
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