summaryrefslogtreecommitdiff
path: root/Types.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-13 23:03:01 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-13 23:03:01 -0400
commit64b5167b0f9620bd96cd57b58f0e40be741e5420 (patch)
tree2d052576731801f189294c42e10e0d16dfa09a80 /Types.hs
parent912d10e78b725b4d3d4105a0ffe5696c21fc0e10 (diff)
update
Diffstat (limited to 'Types.hs')
-rw-r--r--Types.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Types.hs b/Types.hs
index 15c2ec89f..ce377dda1 100644
--- a/Types.hs
+++ b/Types.hs
@@ -1,7 +1,8 @@
{- git-annex core data types -}
module Types (
- Annex(..),
+ Annex,
+ AnnexState,
makeAnnexState,
runAnnexState,
gitAnnex,
@@ -9,7 +10,6 @@ module Types (
backendsAnnex,
backendsAnnexChange,
- AnnexState(..),
Key(..),
Backend(..)
) where
@@ -34,7 +34,7 @@ makeAnnexState g = AnnexState { repo = g, backends = [] }
-- performs an action in the Annex monad
runAnnexState state action = runStateT (action) state
--- state accessors
+-- Annex monad state accessors
gitAnnex :: Annex GitRepo
gitAnnex = do
state <- get