diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-12-09 13:38:08 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-12-09 13:38:08 -0400 |
| commit | 0f286ff189d0e8be29e9be17cb18ec290593a40d (patch) | |
| tree | a866e7f549abea6752ab3f8429dc3c1b97a4a389 | |
| parent | c3451715b90022e898f14bb5d45c8d7db9563929 (diff) | |
install_name_tool fix
| -rw-r--r-- | Build/OSXMkLibs.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Build/OSXMkLibs.hs b/Build/OSXMkLibs.hs index 18c0e7c8d..b6e679d73 100644 --- a/Build/OSXMkLibs.hs +++ b/Build/OSXMkLibs.hs @@ -82,12 +82,13 @@ parseOtool = catMaybes . map parse . lines {- Adjusts binaries to use libraries bundled with it, rather than the - system libraries. -} install_name_tool :: FilePath -> [FilePath] -> LibMap -> IO LibMap +install_name_tool _ [] libmap = return libmap install_name_tool binary libs libmap = do let (libnames, libmap') = getLibNames libs libmap let params = concatMap change $ zip libs libnames ok <- boolSystem "install_name_tool" $ params ++ [File binary] unless ok $ - hPutStrLn stderr $ "install_name_tool failed for " ++ binary + error $ "install_name_tool failed for " ++ binary return libmap' where change (lib, libname) = |