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

Diff for /loncom/interface/lonpickstudent.pm between versions 1.29 and 1.32

version 1.29, 2011/01/23 01:04:26 version 1.32, 2013/07/15 16:13:22
Line 108  function gochoose(uname,udom) { Line 108  function gochoose(uname,udom) {
 </script>  </script>
 ENDSCRIPT  ENDSCRIPT
   
     $r->print('<form>');      $r->print('<form action="">');
     if ($allowed && (!$env{'form.roles'})) {      if ($allowed && (!$env{'form.roles'})) {
 # -------------------------------------------------------- Get course personnel  # -------------------------------------------------------- Get course personnel
  $r->print('<h3>'.$env{'course.'.$env{'request.course.id'}.'.description'}.   $r->print('<h3>'.$env{'course.'.$env{'request.course.id'}.'.description'}.
Line 121  ENDSCRIPT Line 121  ENDSCRIPT
  my ($puname,$pudom)=split(/\:/,$user);   my ($puname,$pudom)=split(/\:/,$user);
  $r->print(&Apache::loncommon::start_data_table_row().   $r->print(&Apache::loncommon::start_data_table_row().
   '<td>'.    '<td>'.
   '<input type="button" value="'.&mt('Select').'" onClick="gochoose('.    '<input type="button" value="'.&mt('Select').'" onclick="gochoose('.
   "'".$puname."','".$pudom."')".'" /></td><td>'.$role.'</td><td>'.    "'".$puname."','".$pudom."')".'" /></td><td>'.$role.'</td><td>'.
   &Apache::loncommon::aboutmewrapper(&Apache::loncommon::plainname($puname,$pudom),$puname,$pudom).'</td>'.    &Apache::loncommon::aboutmewrapper(&Apache::loncommon::plainname($puname,$pudom),$puname,$pudom).'</td>'.
   &Apache::loncommon::end_data_table_row());    &Apache::loncommon::end_data_table_row());
Line 133  ENDSCRIPT Line 133  ENDSCRIPT
   
  $r->print('</p>');   $r->print('</p>');
   
           $r->rflush();
   
         unless ($env{'form.courseadvonly'}) {          unless ($env{'form.courseadvonly'}) {
   
 # ------------------------------------------------------------------ Students  # ------------------------------------------------------------------ Students
Line 200  ENDSCRIPT Line 202  ENDSCRIPT
                         }                          }
         $result .=&Apache::loncommon::start_data_table_row().          $result .=&Apache::loncommon::start_data_table_row().
               '<td>'.                '<td>'.
           '<input type="button" value="'.&mt('Select').'" onClick="gochoose('.            '<input type="button" value="'.&mt('Select').'" onclick="gochoose('.
           "'".$uname."','".$udom."')".'" /></td>'.            "'".$uname."','".$udom."')".'" /></td>'.
           '<td><tt>'.$uname.'</tt></td><td> <tt>'.$udom.            '<td><tt>'.$uname.'</tt></td><td> <tt>'.$udom.
           '</tt></td><td>'.            '</tt></td><td>'.
Line 237  ENDSCRIPT Line 239  ENDSCRIPT
   &Apache::loncommon::plainname($env{'user.name'},    &Apache::loncommon::plainname($env{'user.name'},
  $env{'user.domain'}).'</h3>');   $env{'user.domain'}).'</h3>');
  $r->print($filtermsg);   $r->print($filtermsg);
           $r->rflush();
   
  $r->print('<p>'.&Apache::loncommon::start_data_table());   $r->print('<p>'.&Apache::loncommon::start_data_table());
  my %user_role=&Apache::lonnet::get_my_roles();   my %user_role=&Apache::lonnet::get_my_roles();
Line 257  ENDSCRIPT Line 260  ENDSCRIPT
     my ($uname,$udom) = split(':',$user);      my ($uname,$udom) = split(':',$user);
     $r->print(&Apache::loncommon::start_data_table_row().      $r->print(&Apache::loncommon::start_data_table_row().
       '<td>'.        '<td>'.
       '<input type="button" value="'.&mt('Select').'" onClick="gochoose('.        '<input type="button" value="'.&mt('Select').'" onclick="gochoose('.
       "'".$uname."','".$udom."')".'" /></td>'.        "'".$uname."','".$udom."')".'" /></td>'.
       '<td><tt>'.$uname.'</tt></td>'.        '<td><tt>'.$uname.'</tt></td>'.
       '<td><tt>'.$udom.'</tt></td><td>'.        '<td><tt>'.$udom.'</tt></td><td>'.
Removed from v.1.29  
changed lines
  Added in v.1.32

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