summaryrefslogtreecommitdiffhomepage
path: root/Commands.hs
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@ing.unitn.it>2009-01-29 16:27:04 +0100
committerAndrea Rossato <andrea.rossato@ing.unitn.it>2009-01-29 16:27:04 +0100
commitc024d3a6277b9539aa45424eef5c646ba02af0b5 (patch)
tree4754445d9ab0fe619d969f044500aa2a774010c1 /Commands.hs
parent56f3676bafd911686364d6a7c6d1155e8c423252 (diff)
downloadxmobar-c024d3a6277b9539aa45424eef5c646ba02af0b5.tar.gz
xmobar-c024d3a6277b9539aa45424eef5c646ba02af0b5.tar.bz2
fix warning in Commands.hs
Ignore-this: 1914e04ea85fe033631c19085f94c477 darcs-hash:20090129152704-d6583-0c174f55f48b2dc0fe0ce9324c58b12a8be79e00.gz
Diffstat (limited to 'Commands.hs')
-rw-r--r--Commands.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Commands.hs b/Commands.hs
index bdc8d60..9697fce 100644
--- a/Commands.hs
+++ b/Commands.hs
@@ -67,7 +67,7 @@ instance Exec Command where
hClose e
case exit of
ExitSuccess -> do
- str <- catch (hGetLineSafe o) (\eof -> return "")
+ str <- catch (hGetLineSafe o) (\_ -> return "")
closeHandles
cb str
_ -> do closeHandles