From efef527d5b2e42e261fa7af6947aad6553426ebe Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sun, 12 Oct 2014 14:32:56 -0400
Subject: Merge from git-annex.

Includes changing to new exceptions library, and some whitespace fixes.
---
 Utility/CoProcess.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Utility/CoProcess.hs')

diff --git a/Utility/CoProcess.hs b/Utility/CoProcess.hs
index 332c09d..97826ec 100644
--- a/Utility/CoProcess.hs
+++ b/Utility/CoProcess.hs
@@ -65,7 +65,7 @@ query ch send receive = do
 			restartable s (receive $ coProcessFrom s)
 				return
   where
-  	restartable s a cont
+	restartable s a cont
 		| coProcessNumRestarts (coProcessSpec s) > 0 =
 			maybe restart cont =<< catchMaybeIO a
 		| otherwise = cont =<< a
@@ -87,7 +87,7 @@ rawMode ch = do
 	raw $ coProcessTo s
 	return ch
   where
-  	raw h = do
+	raw h = do
 		fileEncoding h
 #ifdef mingw32_HOST_OS
 		hSetNewlineMode h noNewlineTranslation
-- 
cgit v1.2.3