--- loncom/interface/Attic/londropadd.pm 2003/12/28 01:30:50 1.97 +++ loncom/interface/Attic/londropadd.pm 2004/01/15 03:18:19 1.98 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to drop and add students in courses # -# $Id: londropadd.pm,v 1.97 2003/12/28 01:30:50 raeburn Exp $ +# $Id: londropadd.pm,v 1.98 2004/01/15 03:18:19 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -42,7 +42,9 @@ use Apache::lonlocal; ############################################################### ############################################################### sub header { - my $bodytag=&Apache::loncommon::bodytag('Enrollment Manager'); + my $bodytag=&Apache::loncommon::bodytag('Enrollment Manager'). + &Apache::loncommon::help_open_faq(9). + &Apache::loncommon::help_open_bug('Instructor Interface'); my $title = &mt('LON-CAPA Enrollment Manager'); return(< @@ -143,28 +145,34 @@ sub print_main_menu { 'view' => 'View Class List', 'drop' => 'Drop Students', 'populate' => 'Automated Enrollment Manager'); + my %help=(); + foreach ('Course_Drop_Student','Course_Add_Student', + 'Course_Modify_Student_Data','Course_View_Class_List', + 'Course_Create_Class_List') { + $help{$_}=&Apache::loncommon::help_open_topic($_); + } $r->print(< - $Text{'upload'} - +$Text{'upload'} +$help{'Course_Create_Class_List'}

$Text{'enrollone'} - + $help{'Course_Add_Student'}

$Text{'modify'} - + $help{'Course_Modify_Student_Data'}

$Text{'view'} - + $help{'Course_View_Class_List'}

$Text{'drop'} - + $help{'Course_Drop_Student'}

$Text{'populate'}