test suite found a problem with today's work

". def" did not do what I thought it would, at all.
This commit is contained in:
Joey Hess 2015-01-28 18:01:54 -04:00
parent 10af77d657
commit e0187d5d12
3 changed files with 5 additions and 5 deletions

View file

@ -426,4 +426,4 @@ keyPath key hasher = hasher key </> f </> f
- special remotes and git-annex repos.
-}
keyPaths :: Key -> [FilePath]
keyPaths key = map (keyPath key . def) dirHashes
keyPaths key = map (\h -> keyPath key (h def)) dirHashes