diff options
| author | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2009-01-29 16:27:04 +0100 |
|---|---|---|
| committer | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2009-01-29 16:27:04 +0100 |
| commit | c024d3a6277b9539aa45424eef5c646ba02af0b5 (patch) | |
| tree | 4754445d9ab0fe619d969f044500aa2a774010c1 /Commands.hs | |
| parent | 56f3676bafd911686364d6a7c6d1155e8c423252 (diff) | |
| download | xmobar-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.hs | 2 |
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 |