aboutsummaryrefslogtreecommitdiff
path: root/Annex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-02-13 01:49:38 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-02-13 01:49:38 -0400
commit55de2b85f4e646e361d71e58f36d65b617c625e0 (patch)
tree1838bc5713db0951297d4bd76ef2d3fbdeb361a1 /Annex.hs
parent09edd77928dd55f36292c0e299e6ace70da84578 (diff)
metacata command can now operate on many files at once
Diffstat (limited to 'Annex.hs')
-rw-r--r--Annex.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/Annex.hs b/Annex.hs
index 87a06615e..f3f2a9177 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -58,6 +58,7 @@ import Types.UUID
import Types.FileMatcher
import Types.NumCopies
import Types.LockPool
+import Types.MetaData
import qualified Utility.Matcher
import qualified Data.Map as M
import qualified Data.Set as S
@@ -109,6 +110,7 @@ data AnnexState = AnnexState
, lockpool :: LockPool
, flags :: M.Map String Bool
, fields :: M.Map String String
+ , modmeta :: [ModMeta]
, cleanup :: M.Map String (Annex ())
, inodeschanged :: Maybe Bool
, useragent :: Maybe String
@@ -146,6 +148,7 @@ newState c r = AnnexState
, lockpool = M.empty
, flags = M.empty
, fields = M.empty
+ , modmeta = []
, cleanup = M.empty
, inodeschanged = Nothing
, useragent = Nothing