From c024d3a6277b9539aa45424eef5c646ba02af0b5 Mon Sep 17 00:00:00 2001 From: Andrea Rossato Date: Thu, 29 Jan 2009 16:27:04 +0100 Subject: fix warning in Commands.hs Ignore-this: 1914e04ea85fe033631c19085f94c477 darcs-hash:20090129152704-d6583-0c174f55f48b2dc0fe0ce9324c58b12a8be79e00.gz --- Commands.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- cgit v1.2.3