don't exit sub via next
parent
5f17d41b3b
commit
35bc56bb66
|
@ -29,7 +29,7 @@ sub processline {
|
||||||
my %users;
|
my %users;
|
||||||
sub processuser {
|
sub processuser {
|
||||||
my $user=shift;
|
my $user=shift;
|
||||||
next if $user=~/^-/ || $users{$user};
|
return if $user=~/^-/ || $users{$user};
|
||||||
$users{$user}=1;
|
$users{$user}=1;
|
||||||
my $ret=system("su", $user, "-s", "/bin/sh", "-c", "--", "$0 --nonglobal @ARGV");
|
my $ret=system("su", $user, "-s", "/bin/sh", "-c", "--", "$0 --nonglobal @ARGV");
|
||||||
if ($ret != 0) {
|
if ($ret != 0) {
|
||||||
|
|
Loading…
Reference in New Issue