diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-01-14 16:44:04 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-01-14 16:44:04 -0400 |
| commit | c340ae26370b4b3eca5433fd2462836abce19533 (patch) | |
| tree | 62a7d24c9b14e56d3b58293679a6758704f2aabf /Build/OSXMkLibs.hs | |
| parent | 619e567cc8b59b549f70c95357455ac95fec942d (diff) | |
fix warning
Diffstat (limited to 'Build/OSXMkLibs.hs')
| -rw-r--r-- | Build/OSXMkLibs.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Build/OSXMkLibs.hs b/Build/OSXMkLibs.hs index e3802e58c..f6485aa01 100644 --- a/Build/OSXMkLibs.hs +++ b/Build/OSXMkLibs.hs @@ -109,7 +109,7 @@ expand_rpath libs replacement_libs cmd let m = if (null s) then M.fromList replacement_libs else M.fromList $ mapMaybe parse $ lines s - return $ map (replace m) libs + return $ map (replacem m) libs | otherwise = return libs where probe c = "DYLD_PRINT_RPATHS=1 " ++ c ++ " --getting-rpath-dummy-option 2>&1 | grep RPATH" @@ -117,7 +117,7 @@ expand_rpath libs replacement_libs cmd ("RPATH":"successful":"expansion":"of":old:"to:":new:[]) -> Just (old, new) _ -> Nothing - replace m l = fromMaybe l $ M.lookup l m + replacem m l = fromMaybe l $ M.lookup l m parseOtool :: String -> [FilePath] parseOtool = catMaybes . map parse . lines |