summaryrefslogtreecommitdiff
path: root/Annex.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Annex.hs')
-rw-r--r--Annex.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/Annex.hs b/Annex.hs
index 0e8ec2b7b..60ae91708 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -61,7 +61,6 @@ gitRepoChange :: Git.Repo -> Annex ()
gitRepoChange r = do
state <- get
put state { Internals.repo = r }
- return ()
{- Returns the backends being used. -}
backends :: Annex [Backend]
@@ -74,7 +73,6 @@ backendsChange :: [Backend] -> Annex ()
backendsChange b = do
state <- get
put state { Internals.backends = b }
- return ()
{- Returns the full list of supported backends. -}
supportedBackends :: Annex [Backend]
@@ -95,7 +93,6 @@ flagChange :: FlagName -> Flag -> Annex ()
flagChange name val = do
state <- get
put state { Internals.flags = M.insert name val $ Internals.flags state }
- return ()
{- Gets the value of a String flag (or "" if there is no such String flag) -}
flagGet :: FlagName -> Annex String