avoid build warning when built w/o magic-mime
This commit is contained in:
parent
875c7b5cc9
commit
4c5a489f3e
1 changed files with 1 additions and 1 deletions
|
@ -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 $
|
||||
|
|
Loading…
Reference in a new issue