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

skip frameworks

Browse source 
I suspect this might be related to recent reports of hangs.
This commit is contained in:
Joey Hess 2012-12-07 12:21:15 -04:00
parent 9e8703895c
commit f850a64bd0
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Build/OSXMkLibs.hs
View file

@ -51,7 +51,9 @@ otool :: FilePath -> IO [FilePath]
otool appbase = do otool appbase = do
files <- filterM doesFileExist =<< dirContentsRecursive appbase files <- filterM doesFileExist =<< dirContentsRecursive appbase
s <- readProcess "otool" ("-L" : files) s <- readProcess "otool" ("-L" : files)
return $ nub $ parseOtool s return $ nub $ filter (not . framework) $ parseOtool s
where
framework f = ".framework" `isInfixOf` f
parseOtool :: String -> [FilePath] parseOtool :: String -> [FilePath]
parseOtool = catMaybes . map parse . lines parseOtool = catMaybes . map parse . lines