diff --git a/Annex/FileMatcher.hs b/Annex/FileMatcher.hs index d5e4016858..5476d7bcda 100644 --- a/Annex/FileMatcher.hs +++ b/Annex/FileMatcher.hs @@ -173,8 +173,8 @@ preferredContentParser tokens = map (parseToken tokens) . tokenizeMatcher mkLargeFilesParser :: Annex (String -> [ParseResult (MatchFiles Annex)]) mkLargeFilesParser = do - magicmime <- liftIO initMagicMime #ifdef WITH_MAGICMIME + magicmime <- liftIO initMagicMime let mimer n f = ValueToken n (usev $ f magicmime) #else let mimer n = ValueToken n $