From c253d07a82f1ffac4aa256c09a6fd7dcbc780923 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Fri, 8 Apr 2011 20:55:22 -0400
Subject: minor

---
 Remote/Git.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'Remote/Git.hs')

diff --git a/Remote/Git.hs b/Remote/Git.hs
index 2936beaf7..c315d457d 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -57,9 +57,7 @@ gen r u _ = do
 
 	u' <- getUUID r'
 
-	let defcst = if not $ Git.repoIsUrl r
-		then cheapRemoteCost
-		else expensiveRemoteCost
+	let defcst = if cheap then cheapRemoteCost else expensiveRemoteCost
 	cst <- remoteCost r' defcst
 
 	return $ Remote {
@@ -70,7 +68,7 @@ gen r u _ = do
 		retrieveKeyFile = copyFromRemote r',
 		removeKey = dropKey r',
 		hasKey = inAnnex r',
-		hasKeyCheap = not (Git.repoIsUrl r'),
+		hasKeyCheap = cheap,
 		config = Nothing
 	}
 
-- 
cgit v1.2.3