diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-06-03 18:00:57 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-06-03 18:00:57 +0200 |
| commit | 9dd598b045278b889cd9923225ebccf9bcaa9942 (patch) | |
| tree | 22240251b2b42fed5655c6d184f702ccfd82e3c3 /perl-install | |
| parent | 97a49721274c5538f121811195e802669424c316 (diff) | |
| download | drakx-9dd598b045278b889cd9923225ebccf9bcaa9942.tar drakx-9dd598b045278b889cd9923225ebccf9bcaa9942.tar.gz drakx-9dd598b045278b889cd9923225ebccf9bcaa9942.tar.bz2 drakx-9dd598b045278b889cd9923225ebccf9bcaa9942.tar.xz drakx-9dd598b045278b889cd9923225ebccf9bcaa9942.zip | |
with polkit, it's always an UID, never a login
(fixing previous commit)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/run_program.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/run_program.pm b/perl-install/run_program.pm index 300179832..86386d081 100644 --- a/perl-install/run_program.pm +++ b/perl-install/run_program.pm @@ -199,7 +199,7 @@ sub raw { my $home; if ($options->{as_user}) { my $uid; - $uid = $ENV{PKEXEC_UID} && getpwuid($ENV{PKEXEC_UID}); + $uid = $ENV{PKEXEC_UID}; $uid ||= common::get_parent_uid(); my ($full_user) = grep { $_->[2] eq $uid } list_passwd(); $options->{setuid} = getpwnam($full_user->[0]) if $full_user->[0]; |