loncom/interface/lonpickuser.pm - diff

Return to lonpickuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.4, 2009/09/06 19:09:54	version 1.5, 2011/01/05 18:39:38
Line 203 ENDSET	Line 203 ENDSET
($srch{'srchtype'} eq 'exact') &&	($srch{'srchtype'} eq 'exact') &&
($srch{'srchdomain'} ne '') &&	($srch{'srchdomain'} ne '') &&
($srch{'srchterm'} ne '')) {	($srch{'srchterm'} ne '')) {
	my (%curr_rules,%got_rules);
my ($rules,$ruleorder) =	my ($rules,$ruleorder) =
&Apache::lonnet::inst_userrules($srch{'srchdomain'},'username');	&Apache::lonnet::inst_userrules($srch{'srchdomain'},'username');
$usertype = &Apache::lonuserutils::check_usertype($srch{'srchdomain'},	$usertype = &Apache::lonuserutils::check_usertype($srch{'srchdomain'},
$srch{'srchterm'},$rules);	$srch{'srchterm'},$rules,
	\%curr_rules,\%got_rules);
}	}

my $dom = $env{'form.coursedom'};	my $dom = $env{'form.coursedom'};
Line 215 ENDSET	Line 217 ENDSET
&Apache::lonuserutils::can_create_user($dom,$context,$usertype);	&Apache::lonuserutils::can_create_user($dom,$context,$usertype);
my $userpicker =	my $userpicker =
&Apache::loncommon::user_picker($dom,\%srch,$forcenewuser,	&Apache::loncommon::user_picker($dom,\%srch,$forcenewuser,
'document.userpicker',$cancreate,$usertype);	'document.userpicker',$cancreate,
	$usertype,$context);
my $srchbutton = &mt('Search');	my $srchbutton = &mt('Search');

my $headertext = &mt('Search for a user to add to course personnel');	my $headertext = &mt('Search for a user to add to course personnel');