diff options
| author | jao <jao@gnu.org> | 2020-04-30 18:06:11 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2020-04-30 18:06:11 +0100 |
| commit | a135fcf40172355bc36bc6d4f98b484375dc5add (patch) | |
| tree | b098383b0cdb4c7576a29585726788a01f9364db /src/Xmobar/Plugins/StdinReader.hs | |
| parent | 968b304a301c9112a7fd0a0606f02ffdbb92698b (diff) | |
| download | xmobar-a135fcf40172355bc36bc6d4f98b484375dc5add.tar.gz xmobar-a135fcf40172355bc36bc6d4f98b484375dc5add.tar.bz2 | |
Spurious import and hlinting
Diffstat (limited to 'src/Xmobar/Plugins/StdinReader.hs')
| -rw-r--r-- | src/Xmobar/Plugins/StdinReader.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Xmobar/Plugins/StdinReader.hs b/src/Xmobar/Plugins/StdinReader.hs index 5a8b2be..bc4bb5f 100644 --- a/src/Xmobar/Plugins/StdinReader.hs +++ b/src/Xmobar/Plugins/StdinReader.hs @@ -31,8 +31,7 @@ data StdinReader = StdinReader | UnsafeStdinReader instance Exec StdinReader where start stdinReader cb = do - s <- handle (\(SomeException e) -> do hPrint stderr e; return "") - (hGetLine stdin) + s <- handle (\(SomeException e) -> do hPrint stderr e; return "") getLine cb $ escape stdinReader s eof <- isEOF if eof |