reformat

1 files changed, 26 insertions, 26 deletions

diff --git a/Remote/External.hs b/Remote/External.hs
index 47220c23c..dd8e793c7 100644
--- a/Remote/External.hs
+++ b/Remote/External.hs
@@ -48,32 +48,32 @@ gen r u c gc = do
 		(simplyPrepare $ retrieve external)
 		(simplyPrepare $ remove external)
 		(simplyPrepare $ checkKey external)
-		Remote {
-			uuid = u,
-			cost = cst,
-			name = Git.repoDescribe r,
-			storeKey = storeKeyDummy,
-			retrieveKeyFile = retreiveKeyFileDummy,
-			retrieveKeyFileCheap = \_ _ -> return False,
-			removeKey = removeKeyDummy,
-			checkPresent = checkPresentDummy,
-			checkPresentCheap = False,
-			whereisKey = Nothing,
-			remoteFsck = Nothing,
-			repairRepo = Nothing,
-			config = c,
-			localpath = Nothing,
-			repo = r,
-			gitconfig = gc,
-			readonly = False,
-			availability = avail,
-			remotetype = remote,
-			mkUnavailable = gen r u c $
-				gc { remoteAnnexExternalType = Just "!dne!" },
-			getInfo = return [("externaltype", externaltype)],
-			claimUrl = Just (claimurl external),
-			checkUrl = Just (checkurl external)
-		}
+		Remote
+			{ uuid = u
+			, cost = cst
+			, name = Git.repoDescribe r
+			, storeKey = storeKeyDummy
+			, retrieveKeyFile = retreiveKeyFileDummy
+			, retrieveKeyFileCheap = \_ _ -> return False
+			, removeKey = removeKeyDummy
+			, checkPresent = checkPresentDummy
+			, checkPresentCheap = False
+			, whereisKey = Nothing
+			, remoteFsck = Nothing
+			, repairRepo = Nothing
+			, config = c
+			, localpath = Nothing
+			, repo = r
+			, gitconfig = gc
+			, readonly = False
+			, availability = avail
+			, remotetype = remote
+			, mkUnavailable = gen r u c $
+				gc { remoteAnnexExternalType = Just "!dne!" }
+			, getInfo = return [("externaltype", externaltype)]
+			, claimUrl = Just (claimurl external)
+			, checkUrl = Just (checkurl external)
+			}
   where
 	externaltype = fromMaybe (error "missing externaltype") (remoteAnnexExternalType gc)