osx build fix

This commit is contained in:
Joey Hess 2020-08-07 13:15:36 -04:00
parent 1c13745112
commit 24e5bca2e0
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -25,6 +25,7 @@ import Utility.Directory
import Utility.Env import Utility.Env
import Build.BundledPrograms import Build.BundledPrograms
#ifdef darwin_HOST_OS #ifdef darwin_HOST_OS
import System.IO
import Build.OSXMkLibs (mklibs) import Build.OSXMkLibs (mklibs)
import Build.Version import Build.Version
import Utility.Split import Utility.Split
@ -131,7 +132,7 @@ cp src dest = do
installMagic :: FilePath -> IO () installMagic :: FilePath -> IO ()
#ifdef darwin_HOST_OS #ifdef darwin_HOST_OS
installMagic topdir = getEnv "OSX_MAGIC_FILE" >>= \case installMagic topdir = getEnv "OSX_MAGIC_FILE" >>= \case
Nothing -> hputStrLn stderr "OSX_MAGIC_FILE not set; not including it" Nothing -> hPutStrLn stderr "OSX_MAGIC_FILE not set; not including it"
Just f -> do Just f -> do
let mdir = topdir </> "magic" let mdir = topdir </> "magic"
createDirectoryIfMissing True mdir createDirectoryIfMissing True mdir