diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-10-26 15:59:50 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-10-26 15:59:50 -0400 |
| commit | ef26076a5a3df9b8740883e3f7b3b68585b47ad5 (patch) | |
| tree | 4866077b46f25ba1446ddebf7d5b151fc98fd8ac /TypeInternals.hs | |
| parent | 4cda7b6e7c2f08c99b0c4c14bb86e691903a985b (diff) | |
add git queue to Annex monad
not used anywhere just yet..
Diffstat (limited to 'TypeInternals.hs')
| -rw-r--r-- | TypeInternals.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/TypeInternals.hs b/TypeInternals.hs index 188f5e534..d4404fd39 100644 --- a/TypeInternals.hs +++ b/TypeInternals.hs @@ -10,6 +10,7 @@ import Data.String.Utils import qualified Data.Map as M import qualified GitRepo as Git +import qualified GitQueue -- command-line flags type FlagName = String @@ -24,7 +25,8 @@ data AnnexState = AnnexState { repo :: Git.Repo, backends :: [Backend], supportedBackends :: [Backend], - flags :: M.Map FlagName Flag + flags :: M.Map FlagName Flag, + repoqueue :: GitQueue.Queue } deriving (Show) -- git-annex's monad |