--- loncom/interface/Attic/londropadd.pm 2003/07/14 15:25:59 1.74 +++ loncom/interface/Attic/londropadd.pm 2003/07/21 17:54:43 1.76 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to drop and add students in courses # -# $Id: londropadd.pm,v 1.74 2003/07/14 15:25:59 matthew Exp $ +# $Id: londropadd.pm,v 1.76 2003/07/21 17:54:43 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -154,7 +154,7 @@ sub print_main_menu {

- View Classlist + View Class List

@@ -753,7 +753,7 @@ sub print_enroll_single_student_form { my $defdom=$r->dir_config('lonDefDomain'); # Set up authentication forms my ($krbdef,$krbdefdom) = - &Apache::loncommon::get_kerberos_defaults($defdom); + &Apache::loncommon::get_kerberos_defaults($domain); $javascript_validations=&javascript_validations($krbdefdom); my %param = ( formname => 'document.studentform', kerb_def_dom => $krbdefdom, @@ -794,9 +794,9 @@ Please select an authentication mechanis

$krbform -

+
$intform -

+
$locform

END @@ -923,7 +923,7 @@ sub print_html_classlist {

-Current Classlist +Current Class List       END if ($ENV{'form.action'} ne 'modifystudent') { @@ -1028,7 +1028,7 @@ END $excel_workbook->set_tempdir('/home/httpd/perl/tmp'); $excel_sheet = $excel_workbook->addworksheet('classlist'); # - my $description = 'Classlist for '. + my $description = 'Class List for '. $ENV{'course.'.$ENV{'request.course.id'}.'.description'}; $excel_sheet->write($row++,0,$description); #