make symlink relative and install link target
This commit is contained in:
parent
904b175707
commit
9dff416a34
1 changed files with 3 additions and 1 deletions
|
@ -61,8 +61,10 @@ installGitLibs topdir = do
|
||||||
linktarget <- readSymbolicLink f
|
linktarget <- readSymbolicLink f
|
||||||
let linktarget' = gitcoredestdir </> "bin" </> takeFileName linktarget
|
let linktarget' = gitcoredestdir </> "bin" </> takeFileName linktarget
|
||||||
createDirectoryIfMissing True (takeDirectory linktarget')
|
createDirectoryIfMissing True (takeDirectory linktarget')
|
||||||
|
cp f linktarget'
|
||||||
nukeFile destf
|
nukeFile destf
|
||||||
createSymbolicLink linktarget' destf
|
rellinktarget <- relPathDirToFile (takeDirectory destf) linktarget'
|
||||||
|
createSymbolicLink rellinktarget destf
|
||||||
else cp f destf
|
else cp f destf
|
||||||
|
|
||||||
-- install git's template files
|
-- install git's template files
|
||||||
|
|
Loading…
Add table
Reference in a new issue