--- loncom/interface/lonmodifycourse.pm 2006/03/16 21:39:26 1.23 +++ loncom/interface/lonmodifycourse.pm 2006/03/23 22:32:10 1.24 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # automated enrollment course setup handler # -# $Id: lonmodifycourse.pm,v 1.23 2006/03/16 21:39:26 albertel Exp $ +# $Id: lonmodifycourse.pm,v 1.24 2006/03/23 22:32:10 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -259,7 +259,7 @@ all settings except course code, course } } my $numlocalcc = @local_ccs; - my $bodytag=&Apache::loncommon::bodytag(&mt("Modify Course Settings")); + my $helplink=&Apache::loncommon::help_open_topic('Modify_Course',&mt("Help on Modifying Courses")); my ($krbdef,$krbdefdom)=&Apache::loncommon::get_kerberos_defaults($dom); my $curr_authtype = ''; @@ -648,7 +648,6 @@ sub modify_course { sub print_header { my ($r,$tasklongref,$description,$javascriptref) = @_; my %lt =&Apache::lonlocal::texthash( - 'vmcs' => 'View/Modify Course Settings', 'chco' => 'Choose a course', 'main' => 'Main Menu', 'comg' => 'Course Manager', @@ -661,7 +660,7 @@ sub print_header { $description = $lt{'comg'}; } my $page = ''; - my $bodytag=&Apache::loncommon::bodytag($lt{'vmcs'}); + if ($action eq 'start') { $page = "$lt{'chco'}"; } else { @@ -673,7 +672,7 @@ sub print_header { $page .= " -> ".$$tasklongref{$action}.""; } } - my $html=&Apache::lonxml::xmlbegin(); + my $js; if ($action eq 'display') { $js = '