diff options
author | Thierry Vignaud <tv@mandriva.org> | 2009-10-12 16:35:10 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2009-10-12 16:35:10 +0000 |
commit | 15bb5068442bac799f685742bdd70cda018fda11 (patch) | |
tree | ad5b1c0e056a83c78a940f4c9585e993ba1f5e79 /perl-install | |
parent | bc33322d96ffe9beb4becf4d2f649bb8257514ce (diff) | |
download | drakx-15bb5068442bac799f685742bdd70cda018fda11.tar drakx-15bb5068442bac799f685742bdd70cda018fda11.tar.gz drakx-15bb5068442bac799f685742bdd70cda018fda11.tar.bz2 drakx-15bb5068442bac799f685742bdd70cda018fda11.tar.xz drakx-15bb5068442bac799f685742bdd70cda018fda11.zip |
explain
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/run_program.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/run_program.pm b/perl-install/run_program.pm index d30e917c9..e1a6f7f04 100644 --- a/perl-install/run_program.pm +++ b/perl-install/run_program.pm @@ -112,6 +112,7 @@ sub raw { if ($options->{setuid}) { require POSIX; $ENV{LOGNAME} = getpwuid($options->{setuid}) || $ENV{LOGNAME}; + # drop privileges: POSIX::setuid($options->{setuid}); } |