summaryrefslogtreecommitdiff
path: root/Seek.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Seek.hs')
-rw-r--r--Seek.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Seek.hs b/Seek.hs
index 1430ebabd..28c6ffc00 100644
--- a/Seek.hs
+++ b/Seek.hs
@@ -18,6 +18,7 @@ import Backend
import qualified Annex
import qualified Git
import qualified Git.LsFiles as LsFiles
+import qualified Git.CheckAttr
import qualified Limit
seekHelper :: ([FilePath] -> Git.Repo -> IO [FilePath]) -> [FilePath] -> Annex [FilePath]
@@ -31,7 +32,7 @@ withFilesInGit a params = prepFiltered a $ seekHelper LsFiles.inRepo params
withAttrFilesInGit :: String -> ((FilePath, String) -> CommandStart) -> CommandSeek
withAttrFilesInGit attr a params = do
files <- seekHelper LsFiles.inRepo params
- prepFilteredGen a fst $ inRepo $ Git.checkAttr attr files
+ prepFilteredGen a fst $ inRepo $ Git.CheckAttr.lookup attr files
withNumCopies :: (Maybe Int -> FilePath -> CommandStart) -> CommandSeek
withNumCopies a params = withAttrFilesInGit "annex.numcopies" go params