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

install_name_tool fix

Browse source
This commit is contained in:
Joey Hess 2012-12-09 13:38:08 -04:00
parent acbd640f89
commit a2a0a71e2b
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Build/OSXMkLibs.hs
View file

@ -82,12 +82,13 @@ parseOtool = catMaybes . map parse . lines
{- Adjusts binaries to use libraries bundled with it, rather than the {- Adjusts binaries to use libraries bundled with it, rather than the
- system libraries. -} - system libraries. -}
install_name_tool :: FilePath -> [FilePath] -> LibMap -> IO LibMap install_name_tool :: FilePath -> [FilePath] -> LibMap -> IO LibMap
install_name_tool _ [] libmap = return libmap
install_name_tool binary libs libmap = do install_name_tool binary libs libmap = do
let (libnames, libmap') = getLibNames libs libmap let (libnames, libmap') = getLibNames libs libmap
let params = concatMap change $ zip libs libnames let params = concatMap change $ zip libs libnames
ok <- boolSystem "install_name_tool" $ params ++ [File binary] ok <- boolSystem "install_name_tool" $ params ++ [File binary]
unless ok $ unless ok $
hPutStrLn stderr $ "install_name_tool failed for " ++ binary error $ "install_name_tool failed for " ++ binary
return libmap' return libmap'
where where
change (lib, libname) = change (lib, libname) =