From 571cd1c57aeb4e8071b30caf529a0845e8ddc7cf Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Wed, 13 Mar 2013 16:16:01 -0400
Subject: split cost out into its own module

Added a function to insert a new cost into a list, which could be used to
asjust costs after a drag and drop.
---
 Types/GitConfig.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Types/GitConfig.hs')

diff --git a/Types/GitConfig.hs b/Types/GitConfig.hs
index 9c6de59d7..b42f8f229 100644
--- a/Types/GitConfig.hs
+++ b/Types/GitConfig.hs
@@ -16,6 +16,7 @@ import Common
 import qualified Git
 import qualified Git.Config
 import Utility.DataUnits
+import Config.Cost
 
 {- Main git-annex settings. Each setting corresponds to a git-config key
  - such as annex.foo -}
@@ -77,7 +78,7 @@ extractGitConfig r = GitConfig
  - key such as <remote>.annex-foo, or if that is not set, a default from
  - annex.foo -}
 data RemoteGitConfig = RemoteGitConfig
-	{ remoteAnnexCost :: Maybe Int
+	{ remoteAnnexCost :: Maybe Cost
 	, remoteAnnexCostCommand :: Maybe String
 	, remoteAnnexIgnore :: Bool
 	, remoteAnnexSync :: Bool
-- 
cgit v1.2.3