summaryrefslogtreecommitdiff
path: root/git-annex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-10 12:35:28 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-10 12:35:28 -0400
commita745043e7db87ef43dbbb3f93cdf5807ff9958ec (patch)
treed5a6fdcd2723ae405fa9956ae216382953733707 /git-annex.hs
parent7ad4a0bb7d4beb469f0aba017fae1ac48060e862 (diff)
don't repeatedly call repoTop, it's a bit expensive
Diffstat (limited to 'git-annex.hs')
-rw-r--r--git-annex.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/git-annex.hs b/git-annex.hs
index cae72f00d..0f274e674 100644
--- a/git-annex.hs
+++ b/git-annex.hs
@@ -5,6 +5,7 @@ import LocationLog
import GitRepo
main = do
- gitPrep
+ repo <- repoTop
+ gitPrep repo
l <- readLog "demo.log"
writeLog "demo2.log" $ compactLog l