diff options
author | Joey Hess <joey@kitenet.net> | 2011-04-16 16:41:46 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-04-16 16:41:46 -0400 |
commit | 9fe7e6be7064d9c47e6c6fd4f1b3a70da604727d (patch) | |
tree | 503537ba2b11d71f3bea9bd95ee0ca43a73880f7 /Annex.hs | |
parent | 5efd41327045f8da55c972b7391309c99dee5afc (diff) |
add cipher field to AnnexState
Diffstat (limited to 'Annex.hs')
-rw-r--r-- | Annex.hs | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -22,6 +22,7 @@ import qualified GitRepo as Git import qualified GitQueue import qualified BackendClass import qualified RemoteClass +import qualified CryptoTypes -- git-annex's monad type Annex = StateT AnnexState IO @@ -41,7 +42,8 @@ data AnnexState = AnnexState , toremote :: Maybe String , fromremote :: Maybe String , exclude :: [String] - } deriving (Show) + , cipher :: Maybe CryptoTypes.Cipher + } newState :: Git.Repo -> [BackendClass.Backend Annex] -> AnnexState newState gitrepo allbackends = AnnexState @@ -58,6 +60,7 @@ newState gitrepo allbackends = AnnexState , toremote = Nothing , fromremote = Nothing , exclude = [] + , cipher = Nothing } {- Create and returns an Annex state object for the specified git repo. -} |