summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-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