Fix to speed up checking domains and users
This commit is contained in:
parent
77b2be8202
commit
2d5768a612
12
forgot.cgi
12
forgot.cgi
@ -32,14 +32,10 @@ my ($muser, $muserdom);
|
||||
if (!$wuser && $link{'muser'}) {
|
||||
# Probably Virtualmin mail user, so try to find it
|
||||
&foreign_require("virtual-server");
|
||||
foreach my $d (&virtual_server::list_domains()) {
|
||||
my @users =
|
||||
&virtual_server::list_domain_users($d, 0, 0, 0, 0, 1);
|
||||
($muser) = grep { $_->{'user'} eq lc($link{'muser'}) } @users;
|
||||
if ($muser) {
|
||||
$muserdom = $d;
|
||||
last;
|
||||
}
|
||||
my $d = &virtual_server::get_user_domain(lc($link{'muser'}));
|
||||
if ($d) {
|
||||
my @u = &virtual_server::list_domain_users($d, 0, 0, 1, 1, 0);
|
||||
($muser) = grep { $_->{'user'} eq lc($link{'muser'}) } @u;
|
||||
}
|
||||
}
|
||||
|
||||
|
@ -33,11 +33,10 @@ my $muser;
|
||||
if (!$wuser && &foreign_check("virtual-server")) {
|
||||
# Probably in Virtualmin, so try to find the user
|
||||
&foreign_require("virtual-server");
|
||||
foreach my $d (&virtual_server::list_domains()) {
|
||||
my @users =
|
||||
&virtual_server::list_domain_users($d, 0, 0, 0, 0, 1);
|
||||
($muser) = grep { $_->{'user'} eq lc($in{'forgot'}) } @users;
|
||||
last if ($muser);
|
||||
my $d = &virtual_server::get_user_domain(lc($in{'forgot'}));
|
||||
if ($d) {
|
||||
my @u = &virtual_server::list_domain_users($d, 0, 0, 1, 1, 0);
|
||||
($muser) = grep { $_->{'user'} eq lc($in{'forgot'}) } @u;
|
||||
}
|
||||
}
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user