diff options
author | Guy Maor <maor@debian.org> | 1999-01-29 08:53:59 +0000 |
---|---|---|
committer | Guy Maor <maor@debian.org> | 1999-01-29 08:53:59 +0000 |
commit | 144d63847622fb578b306a18d1e848b240771f64 (patch) | |
tree | ed6bf749e61d8c1aa39aef81e6767bbf0cbc5f43 /scripts/dpkg-distaddfile.pl | |
parent | 026b9db8830c1cebfda297cd9fdb22d5aa60dea3 (diff) | |
download | dpkg-144d63847622fb578b306a18d1e848b240771f64.tar.gz |
dpkg 1.4.1
Diffstat (limited to 'scripts/dpkg-distaddfile.pl')
-rwxr-xr-x[-rw-r--r--] | scripts/dpkg-distaddfile.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/scripts/dpkg-distaddfile.pl b/scripts/dpkg-distaddfile.pl index 6bbfebcaf..3bebc2c82 100644..100755 --- a/scripts/dpkg-distaddfile.pl +++ b/scripts/dpkg-distaddfile.pl @@ -45,6 +45,8 @@ while (@ARGV && $ARGV[0] =~ m/^-/) { $fileslistfile="./$fileslistfile" if $fileslistfile =~ m/^\s/; open(Y,"> $fileslistfile.new") || &syserr("open new files list file"); +chown(@fowner, "$fileslistfile.new") + || &syserr("chown new files list file"); if (open(X,"< $fileslistfile")) { while (<X>) { s/\n$//; |