From d9fdc76a144588b64811d62ee144aa8dde49c8d1 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Fri, 6 Jan 2012 21:53:47 -0400
Subject: [PATCH] layout

---
 Checks.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Checks.hs b/Checks.hs
index 9d846842db..94ee752917 100644
--- a/Checks.hs
+++ b/Checks.hs
@@ -24,8 +24,8 @@ dontCheck :: CommandCheck -> Command -> Command
 dontCheck check cmd = mutateCheck cmd $ \c -> filter (/= check) c
 
 addCheck :: Annex () -> Command -> Command
-addCheck check cmd = mutateCheck cmd $
-	\c -> CommandCheck (length c + 100) check : c
+addCheck check cmd = mutateCheck cmd $ \c ->
+	CommandCheck (length c + 100) check : c
 
 mutateCheck :: Command -> ([CommandCheck] -> [CommandCheck]) -> Command
 mutateCheck cmd@(Command { cmdcheck = c }) a = cmd { cmdcheck = a c }