Commit 21d29857 authored by Mike Hibler's avatar Mike Hibler

Set umask to 0 while unpacking archives.

parent d09d204a
......@@ -224,8 +224,10 @@ push(@identlines, "$rpm $filestamp $filemd5");
if ($copymode) {
$rpm = $copyfile;
}
my $oumask = umask(0);
system("rpm -U --force --nodeps $rpm");
$exit_status = $? >> 8;
umask($oumask);
if ($copymode) {
unlink($copyfile);
}
......
......@@ -378,8 +378,10 @@ if ($tarlist =~ /^([-\@\w\.\/]+)$/) {
else {
die("Bad data in tarlist name: $tarlist");
}
my $oumask = umask(0);
system("tar $decompressflag -xvf $tarfile > $tarlist");
$exit_status = $? >> 8;
umask($oumask);
if ($copymode) {
unlink($copyfile);
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment