Set file permissions when prepare XZ tarball

This commit is contained in:
Sergey Avseyev 2015-05-26 13:43:21 +03:00
commit 0fd0ace00c
No known key found for this signature in database
GPG key ID: B8C52427872CF7D3

View file

@ -571,7 +571,7 @@ proc xzDist(c: var ConfigData) =
echo "Copying ", s, " to ", tmpDir / d echo "Copying ", s, " to ", tmpDir / d
let destdir = tmpdir / d.splitFile.dir let destdir = tmpdir / d.splitFile.dir
if not dirExists(destdir): createDir(destdir) if not dirExists(destdir): createDir(destdir)
copyFile(s, tmpDir / d) copyFileWithPermissions(s, tmpDir / d)
processFile(z, proj / buildBatFile32, "build" / buildBatFile32) processFile(z, proj / buildBatFile32, "build" / buildBatFile32)
processFile(z, proj / buildBatFile64, "build" / buildBatFile64) processFile(z, proj / buildBatFile64, "build" / buildBatFile64)