From eddcd59331948a90b3d41354e9ac924fedfb80f5 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 9 Jan 2015 11:58:38 -0400 Subject: fix build failure --- Utility/LinuxMkLibs.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Utility') diff --git a/Utility/LinuxMkLibs.hs b/Utility/LinuxMkLibs.hs index 6074ba261..2482a9bca 100644 --- a/Utility/LinuxMkLibs.hs +++ b/Utility/LinuxMkLibs.hs @@ -36,7 +36,7 @@ installLib installfile top lib = ifM (doesFileExist lib) checksymlink f = whenM (isSymbolicLink <$> getSymbolicLinkStatus (inTop top f)) $ do l <- readSymbolicLink (inTop top f) let absl = absPathFrom (takeDirectory f) l - let target = relPathDirToFile (takeDirectory f) absl + target <- relPathDirToFile (takeDirectory f) absl installfile top absl nukeFile (top ++ f) createSymbolicLink target (inTop top f) -- cgit v1.2.3