summaryrefslogtreecommitdiff
path: root/GitAnnex.hs
diff options
context:
space:
mode:
Diffstat (limited to 'GitAnnex.hs')
-rw-r--r--GitAnnex.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/GitAnnex.hs b/GitAnnex.hs
index b22313d3c..103ee262f 100644
--- a/GitAnnex.hs
+++ b/GitAnnex.hs
@@ -113,6 +113,4 @@ header :: String
header = "Usage: git-annex command [option ..]"
run :: [String] -> IO ()
-run args = do
- gitrepo <- Git.repoFromCwd
- dispatch gitrepo args cmds options header
+run args = dispatch args cmds options header =<< Git.repoFromCwd