Bug 387970, fix permissions on pgp key, r=preed

git-svn-id: svn://10.0.0.236/trunk@236573 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
nrthomas%gmail.com 2007-09-24 21:39:29 +00:00
parent e45d475010
commit a4df233251

View File

@ -268,6 +268,10 @@ sub Execute {
my $keyFile = catfile($batch1Dir, 'key-checkout', 'PUBLIC-KEY');
my $keyFileDest = catfile($skelDir, 'KEY');
copy($keyFile, $keyFileDest) or die("Could not copy $keyFile to $keyFileDest: $!");
chmod(0644, $keyFileDest) or
die("Could not chmod $keyFileDest to 644");
chown(-1, $gid, $keyFileDest) or
die("Could not chown $keyFileDest to group $gid");
## Prepare the merging directory.
$this->Shell(