summaryrefslogtreecommitdiff
path: root/Build/OSXMkLibs.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Build/OSXMkLibs.hs')
-rw-r--r--Build/OSXMkLibs.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/Build/OSXMkLibs.hs b/Build/OSXMkLibs.hs
index ba4490f6d..e6cac1850 100644
--- a/Build/OSXMkLibs.hs
+++ b/Build/OSXMkLibs.hs
@@ -102,8 +102,7 @@ install_name_tool binary (lib:rest) libmap = do
getLibName :: FilePath -> LibMap -> (FilePath, LibMap)
getLibName lib libmap = case M.lookup lib libmap of
Just n -> (n, libmap)
- Nothing -> let n = nextfreename
- in (n, M.insert lib n libmap)
+ Nothing -> (nextfreename, M.insert lib nextfreename libmap)
where
names = map (\c -> [c]) letters ++
[[l1, l2] | l1 <- letters, l2 <- letters]