[BACK]Return to lonpickuser.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonpickuser.pm between versions 1.5 and 1.6

version 1.5, 2011/01/05 18:39:38 version 1.6, 2016/09/05 01:46:08
Line 215  ENDSET Line 215  ENDSET
   
     my $cancreate =      my $cancreate =
         &Apache::lonuserutils::can_create_user($dom,$context,$usertype);          &Apache::lonuserutils::can_create_user($dom,$context,$usertype);
     my $userpicker =      my ($userpicker,$cansearch) =
        &Apache::loncommon::user_picker($dom,\%srch,$forcenewuser,         &Apache::loncommon::user_picker($dom,\%srch,$forcenewuser,
                                        'document.userpicker',$cancreate,                                         'document.userpicker',$cancreate,
                                        $usertype,$context);                                         $usertype,$context);
Line 228  ENDSET Line 228  ENDSET
                        $env{'form.coursedom'}.'" />'."\n".                         $env{'form.coursedom'}.'" />'."\n".
                        &set_opener_elems();                         &set_opener_elems();
     unless ($env{'form.phase'} eq 'define_newuser') {       unless ($env{'form.phase'} eq 'define_newuser') { 
         $r->print(<<"ENDBLOCK");          if ($cansearch) {
               
               $r->print(<<"ENDBLOCK");
 <h3>$headertext</h3>  <h3>$headertext</h3>
 <form action="/adm/pickuser" method="post" name="userpicker">  <form action="/adm/pickuser" method="post" name="userpicker">
 $opener_elems  $opener_elems
Line 237  $userpicker Line 239  $userpicker
 <input name="userrole" type="button" value="$srchbutton" onclick="javascript:validateEntry(document.userpicker)" />  <input name="userrole" type="button" value="$srchbutton" onclick="javascript:validateEntry(document.userpicker)" />
 </form>  </form>
 ENDBLOCK  ENDBLOCK
           } else {
               $r->print(<<"ENDBLOCK");
   <form action="/adm/pickuser" method="post" name="userpicker">
   $opener_elems
   <input type="hidden" name="phase" value="get_user_info" />
   </form>
   ENDBLOCK
           }
     }      }
     if (($env{'form.phase'} eq 'get_user_info') && ($env{'form.srchterm'} ne '')) {      if (($env{'form.phase'} eq 'get_user_info') && ($env{'form.srchterm'} ne '')) {
         $r->print('<hr /><div>'.&mt('Searching ...').'</div>');          $r->print('<hr /><div>'.&mt('Searching ...').'</div>');
Removed from v.1.5  
changed lines
  Added in v.1.6

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>