--- loncom/interface/Attic/londropadd.pm 2004/02/27 15:13:27 1.105
+++ loncom/interface/Attic/londropadd.pm 2004/05/12 20:04:57 1.109
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to drop and add students in courses
#
-# $Id: londropadd.pm,v 1.105 2004/02/27 15:13:27 matthew Exp $
+# $Id: londropadd.pm,v 1.109 2004/05/12 20:04:57 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -699,7 +699,7 @@ sub enroll_single_student {
$ENV{'form.csec'}=~s/\W//g;
#
# We do the dates first because the action of making them the defaul
- # in the course is entirely seperate from the action of enrolling the
+ # in the course is entirely separate from the action of enrolling the
# student. Also, a failure in setting the dates as default is not fatal
# to the process of enrolling / modifying a student.
my ($startdate,$enddate) = &get_dates_from_form();
@@ -1195,9 +1195,9 @@ sub show_class_list {
}
# Print out header
$r->print(<
+ | ||
---|---|---|
Count + | $lt{'usrn'} | $lt{'dom'} @@ -1296,6 +1295,7 @@ END || lc($classlist->{$a}->[$third]) cmp lc($classlist->{$b}->[$third]) } (keys(%$classlist)); + my $studentcount = 0; foreach my $student (@Sorted_Students) { my $username = $classlist->{$student}->[$index{'username'}]; my $domain = $classlist->{$student}->[$index{'domain'}]; @@ -1305,7 +1305,7 @@ END my $status = $classlist->{$student}->[$index{'status'}]; next if (($statusmode ne 'Any') && ($status ne $statusmode)); if ($mode eq 'view') { - $r->print(" |
\n "); + $r->print(" | ||
".(++$studentcount)." | \n "); if ($linkto eq 'nothing') { $r->print($username); } elsif ($linkto eq 'aboutme') { @@ -2163,8 +2163,7 @@ sub handler { } elsif ($ENV{'form.action'} eq 'upload') { &Apache::lonhtmlcommon::add_breadcrumb ({href=>'/adm/dropadd?action=upload&state=', - text=>"Upload Classlist", - faq=>9,bug=>'Instructor Interface',}); + text=>"Upload Classlist"}); $r->print(&Apache::lonhtmlcommon::breadcrumbs (undef,'Upload Classlist')); if (! exists($ENV{'form.state'})) { @@ -2183,8 +2182,7 @@ sub handler { } elsif ($ENV{'form.action'} eq 'drop') { &Apache::lonhtmlcommon::add_breadcrumb ({href=>'/adm/dropadd?action=drop', - text=>"Drop Students", - faq=>9,bug=>'Instructor Interface',}); + text=>"Drop Students"}); $r->print(&Apache::lonhtmlcommon::breadcrumbs (undef,'Drop Students')); if (! exists($ENV{'form.state'})) { @@ -2197,8 +2195,7 @@ sub handler { } elsif ($ENV{'form.action'} eq 'enrollstudent') { &Apache::lonhtmlcommon::add_breadcrumb ({href=>'/adm/dropadd?action=enrollstudent', - text=>"Enroll Student", - faq=>9,bug=>'Instructor Interface',}); + text=>"Enroll Student"}); $r->print(&Apache::lonhtmlcommon::breadcrumbs (undef,'Enroll Student')); if (! exists($ENV{'form.state'})) { @@ -2213,8 +2210,7 @@ sub handler { } elsif ($ENV{'form.action'} eq 'classlist') { &Apache::lonhtmlcommon::add_breadcrumb ({href=>'/adm/dropadd?action=classlist', - text=>"View Classlist", - faq=>9,bug=>'Instructor Interface',}); + text=>"View Classlist"}); $r->print(&Apache::lonhtmlcommon::breadcrumbs (undef,'View Classlist')); if (! exists($ENV{'form.state'})) { @@ -2229,8 +2225,7 @@ sub handler { } elsif ($ENV{'form.action'} eq 'modifystudent') { &Apache::lonhtmlcommon::add_breadcrumb ({href=>'/adm/dropadd?action=modifystudent', - text=>"Modify Student Data", - faq=>9,bug=>'Instructor Interface',}); + text=>"Modify Student Data"}); $r->print(&Apache::lonhtmlcommon::breadcrumbs (undef,'Modify Student Data')); if (! exists($ENV{'form.state'})) { |