diff options
author | 2013-07-28 15:27:36 -0400 | |
---|---|---|
committer | 2013-07-28 16:55:42 -0400 | |
commit | 217068206893864ed05911c3b06d8fdb802750a1 (patch) | |
tree | 3bfa87ee63197405f3aa18138eb8affd3ce7c7e7 /Annex/Direct.hs | |
parent | 468e2c789371f924ec4586148e4e9e5618c58303 (diff) |
importfeed: git-annex becomes a podcatcher in 150 LOC
Diffstat (limited to 'Annex/Direct.hs')
-rw-r--r-- | Annex/Direct.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/Direct.hs b/Annex/Direct.hs index cf5806ad6..d2e2cdc00 100644 --- a/Annex/Direct.hs +++ b/Annex/Direct.hs @@ -35,7 +35,7 @@ stageDirect :: Annex Bool stageDirect = do Annex.Queue.flush top <- fromRepo Git.repoPath - (l, cleanup) <- inRepo $ Git.LsFiles.stagedDetails [top] + (l, cleanup) <- inRepo $ Git.LsFiles.stagedOthersDetails [top] forM_ l go void $ liftIO cleanup staged <- Annex.Queue.size |