summaryrefslogtreecommitdiff
path: root/Annex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-06-29 10:00:05 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-06-29 10:00:05 -0400
commit29335bf32685ee665f9ec5acbcfe7f8edabd1b96 (patch)
tree87b11ade25aa99712df020063221ecd6af43b771 /Annex.hs
parentcd0ab91c91e84b726dbc3da39e57893bd1417ee9 (diff)
pointlessness
Diffstat (limited to 'Annex.hs')
-rw-r--r--Annex.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex.hs b/Annex.hs
index 38168334d..32edeff5c 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -128,7 +128,7 @@ newState gitrepo = AnnexState
{- Makes an Annex state object for the specified git repo.
- Ensures the config is read, if it was not already. -}
new :: Git.Repo -> IO AnnexState
-new gitrepo = newState <$> Git.Config.read gitrepo
+new = newState <$$> Git.Config.read
{- performs an action in the Annex monad -}
run :: AnnexState -> Annex a -> IO (a, AnnexState)