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

Diff for /loncom/interface/Attic/londropadd.pm between versions 1.91 and 1.92

version 1.91, 2003/12/05 21:27:59 version 1.92, 2003/12/08 21:01:03
Line 976  END Line 976  END
 # ========================================================= Menu Phase Two Drop  # ========================================================= Menu Phase Two Drop
 sub print_drop_menu {  sub print_drop_menu {
     my $r=shift;      my $r=shift;
     $r->print("<h3>Drop Students</h3>");      $r->print("<h3>".&mt('Drop Students')."</h3>");
     my $cid=$ENV{'request.course.id'};      my $cid=$ENV{'request.course.id'};
     my ($classlist,$keylist) = &Apache::loncoursedata::get_classlist();      my ($classlist,$keylist) = &Apache::loncoursedata::get_classlist();
     if (! defined($classlist)) {      if (! defined($classlist)) {
Line 1095  END Line 1095  END
             $r->print('"'.join('","',("username","domain","ID","student name",              $r->print('"'.join('","',("username","domain","ID","student name",
                                       "section","status")).'"'."\n");                                        "section","status")).'"'."\n");
         } else {          } else {
             $r->print('"'.join('","',("username","domain","ID","student name",              $r->print('"'.join('","',(&mt("username"),"domain","ID","student name",
                                       "section")).'"'."\n");                                        "section")).'"'."\n");
         }          }
     } elsif ($mode eq 'excel') {      } elsif ($mode eq 'excel') {
Line 1514  END Line 1514  END
 <tr>  <tr>
     <th>&nbsp;</th>      <th>&nbsp;</th>
     <th>username</th>      <th>username</th>
     <th>domain</th>      <th>domaind</th>
     <th>ID</th>      <th>ID</th>
     <th>student name</th>      <th>student name</th>
     <th>section</th>      <th>section</th>
Line 1522  END Line 1522  END
 END  END
   
     } else  {      } else  {
           my $wordusername=&mt('username');
           my $worddomain=&mt('domain');
           my $wordstudentname=&mt('student name');
           my $wordsection=&mt('section');
         $r->print(<<END);          $r->print(<<END);
 <table border=2>  <table border=2>
 <tr><th>&nbsp;</th>  <tr><th>&nbsp;</th>
     <th>      <th>
        <a href="/adm/dropadd?action=$action&sortby=username">username</a>         <a href="/adm/dropadd?action=$action&sortby=username">$wordusername</a>
     </th><th>      </th><th>
        <a href="/adm/dropadd?action=$action&sortby=domain">domain</a>         <a href="/adm/dropadd?action=$action&sortby=domain">$worddomain</a>
     </th><th>      </th><th>
        <a href="/adm/dropadd?action=$action&sortby=id">ID</a>         <a href="/adm/dropadd?action=$action&sortby=id">ID</a>
     </th><th>      </th><th>
        <a href="/adm/dropadd?action=$action&sortby=fullname">student name</a>         <a href="/adm/dropadd?action=$action&sortby=fullname">$wordstudentname</a>
     </th><th>      </th><th>
        <a href="/adm/dropadd?action=$action&sortby=section">section</a>         <a href="/adm/dropadd?action=$action&sortby=section">$wordsection</a>
     </th>      </th>
 </tr>  </tr>
 END  END
Line 1578  END Line 1582  END
 END  END
     }      }
     $r->print('</table><br>');      $r->print('</table><br>');
       my $DropStudents=&mt('Drop Students');
       my $CheckAll=&mt('check all');
       my $UncheckAll=&mt('uncheck all');
     $r->print(<<"END");      $r->print(<<"END");
 </p><p>  </p><p>
 <input type="button" value="check all" onclick="javascript:checkAll(document.studentform.droplist)"> &nbsp;  <input type="button" value="$CheckAll" onclick="javascript:checkAll(document.studentform.droplist)"> &nbsp;
 <input type="button" value="uncheck all" onclick="javascript:uncheckAll(document.studentform.droplist)">   <input type="button" value="$UncheckAll" onclick="javascript:uncheckAll(document.studentform.droplist)"> 
 <p><input type=submit value="Drop Students"></p>  <p><input type=submit value="$DropStudents"></p>
 END  END
     return;      return;
 }  }
Line 1604  sub print_first_courselist_upload_form { Line 1611  sub print_first_courselist_upload_form {
     $str .= '<input type="checkbox" name="noFirstLine" /> '.      $str .= '<input type="checkbox" name="noFirstLine" /> '.
         &mt('Ignore First Line')."</p>\n";          &mt('Ignore First Line')."</p>\n";
     $str .= &Apache::loncommon::help_open_topic("Course_Create_Class_List",      $str .= &Apache::loncommon::help_open_topic("Course_Create_Class_List",
                          "How do I create a class list from a spreadsheet").                           &mt("How do I create a class list from a spreadsheet")).
                              "<br />\n";                               "<br />\n";
     $str .= &Apache::loncommon::help_open_topic("Course_Convert_To_CSV",      $str .= &Apache::loncommon::help_open_topic("Course_Convert_To_CSV",
                            "How do I create a CSV file from a spreadsheet").                             &mt("How do I create a CSV file from a spreadsheet")).
                                "<br />\n";                                 "<br />\n";
     $str .= "</body>\n</html>\n";      $str .= "</body>\n</html>\n";
     $r->print($str);      $r->print($str);
Removed from v.1.91  
changed lines
  Added in v.1.92

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