From 1496342c9ed613379ad8bf4aa7939ffd7e56e798 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Tue, 14 May 2013 13:52:30 -0400
Subject: [PATCH] typo

---
 Remote/Git.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Remote/Git.hs b/Remote/Git.hs
index b741918eeb..7054319f56 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -321,6 +321,7 @@ copyFromRemote' r key file dest
 	feedprogressback a = ifM (isJust <$> sshCacheDir)
 		( feedprogressback' a
 		, bracketIO noop (const noop) $ a const
+		)
 	feedprogressback' a = do
 		u <- getUUID
 		let fields = (Fields.remoteUUID, fromUUID u)