loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.1287, 2017/08/07 20:22:13	version 1.1288, 2017/08/11 00:24:52
Line 10138 sub user_picker {	Line 10138 sub user_picker {
$domform = &select_dom_form($currdom,'srchdomain',$allow_blank,1,undef,[$currdom]);	$domform = &select_dom_form($currdom,'srchdomain',$allow_blank,1,undef,[$currdom]);
} else {	} else {
my $defdom = $env{'request.role.domain'};	my $defdom = $env{'request.role.domain'};
my ($trustedref,$untrustedref);	my ($trusted,$untrusted);
if (($context eq 'requestcrs') \|\| ($context eq 'course')) {	if (($context eq 'requestcrs') \|\| ($context eq 'course')) {
($trustedref,$untrustedref) = &Apache::lonnet::trusted_domains('enroll',$defdom);	($trusted,$untrusted) = &Apache::lonnet::trusted_domains('enroll',$defdom);
} elsif ($context eq 'author') {	} elsif ($context eq 'author') {
($trustedref,$untrustedref) = &Apache::lonnet::trusted_domains('othcoau',$defdom);	($trusted,$untrusted) = &Apache::lonnet::trusted_domains('othcoau',$defdom);
} elsif ($context eq 'domain') {	} elsif ($context eq 'domain') {
($trustedref,$untrustedref) = &Apache::lonnet::trusted_domains('domroles',$defdom);	($trusted,$untrusted) = &Apache::lonnet::trusted_domains('domroles',$defdom);
}	}
$domform = &select_dom_form($currdom,'srchdomain',$allow_blank,1,undef,$trustedref,$untrustedref);	$domform = &select_dom_form($currdom,'srchdomain',$allow_blank,1,undef,$trusted,$untrusted);
}	}
my $srchinsel = ' <select name="srchin">';	my $srchinsel = ' <select name="srchin">';