From 9c585954aeba1ead782ca7d91e4695270266e851 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 12 Apr 2016 14:19:34 -0400
Subject: Fix bug in annex.largefiles mimetype= matching when git-annex is run
 in a subdirectory of the repository.

---
 Limit.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Limit.hs')

diff --git a/Limit.hs b/Limit.hs
index dc38b172d..4bd5dd59e 100644
--- a/Limit.hs
+++ b/Limit.hs
@@ -104,7 +104,7 @@ matchMagic (Just magic) glob = Right $ const go
  	cglob = compileGlob glob CaseSensative -- memoized
 	go (MatchingKey _) = pure False
 	go (MatchingFile fi) = liftIO $ catchBoolIO $
-		matchGlob cglob <$> magicFile magic (matchFile fi)
+		matchGlob cglob <$> magicFile magic (currFile fi)
 	go (MatchingInfo _ _ _ mimeval) = matchGlob cglob <$> getInfo mimeval
 matchMagic Nothing _ = Left "unable to load magic database; \"mimetype\" cannot be used"
 #endif
-- 
cgit v1.2.3