--- loncom/interface/lonpickuser.pm 2009/09/06 19:09:54 1.4 +++ loncom/interface/lonpickuser.pm 2011/01/05 18:39:38 1.5 @@ -1,7 +1,7 @@ # The LearningOnline Network # Search for a user # -# $Id: lonpickuser.pm,v 1.4 2009/09/06 19:09:54 raeburn Exp $ +# $Id: lonpickuser.pm,v 1.5 2011/01/05 18:39:38 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -203,10 +203,12 @@ ENDSET ($srch{'srchtype'} eq 'exact') && ($srch{'srchdomain'} ne '') && ($srch{'srchterm'} ne '')) { + my (%curr_rules,%got_rules); my ($rules,$ruleorder) = &Apache::lonnet::inst_userrules($srch{'srchdomain'},'username'); $usertype = &Apache::lonuserutils::check_usertype($srch{'srchdomain'}, - $srch{'srchterm'},$rules); + $srch{'srchterm'},$rules, + \%curr_rules,\%got_rules); } my $dom = $env{'form.coursedom'}; @@ -215,7 +217,8 @@ ENDSET &Apache::lonuserutils::can_create_user($dom,$context,$usertype); my $userpicker = &Apache::loncommon::user_picker($dom,\%srch,$forcenewuser, - 'document.userpicker',$cancreate,$usertype); + 'document.userpicker',$cancreate, + $usertype,$context); my $srchbutton = &mt('Search'); my $headertext = &mt('Search for a user to add to course personnel');