diff options
Diffstat (limited to 'Annex')
| -rw-r--r-- | Annex/Branch.hs | 1 | ||||
| -rw-r--r-- | Annex/Direct.hs | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/Annex/Branch.hs b/Annex/Branch.hs index 1c260ff7e..bc3736a9a 100644 --- a/Annex/Branch.hs +++ b/Annex/Branch.hs @@ -21,6 +21,7 @@ module Annex.Branch ( change, commit, files, + withIndex, ) where import qualified Data.ByteString.Lazy.Char8 as L 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 |