mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix build w/o MagicMime more

Browse source
This commit is contained in:
Joey Hess 2019-05-03 11:30:20 -04:00
parent 740c9f7da8
commit 96dfba7b53
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Annex/FileMatcher.hs
View file

@ -139,7 +139,8 @@ mkLargeFilesParser = do
#ifdef WITH_MAGICMIME #ifdef WITH_MAGICMIME
let mimer n f = ValueToken n (usev $ f magicmime) let mimer n f = ValueToken n (usev $ f magicmime)
#else #else
let mimer n = ValueToken n (const $ Left "\""++n++"\" not supported; not built with MagicMime support") let mimer n = ValueToken n $
const $ Left $ "\""++n++"\" not supported; not built with MagicMime support"
#endif #endif
let parse = parseToken $ commonTokens ++ let parse = parseToken $ commonTokens ++
#ifdef WITH_MAGICMIME #ifdef WITH_MAGICMIME