From a04fe350b8319ea1bbbe0ec7d60a513e2e35d0c5 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sat, 2 Nov 2013 19:54:59 -0400
Subject: [PATCH] fix build

---
 Remote/Web.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Remote/Web.hs b/Remote/Web.hs
index 9af80a7763..1bec4a7de7 100644
--- a/Remote/Web.hs
+++ b/Remote/Web.hs
@@ -44,7 +44,7 @@ list = do
 	return [r]
 
 gen :: Git.Repo -> UUID -> RemoteConfig -> RemoteGitConfig -> Annex (Maybe Remote)
-gen r _ _ gc = 
+gen r _ c gc = 
 	return $ Just Remote {
 		uuid = webUUID,
 		cost = expensiveRemoteCost,