--- loncom/interface/loncreatecourse.pm 2005/01/20 16:30:52 1.75 +++ loncom/interface/loncreatecourse.pm 2005/02/17 08:29:42 1.76 @@ -1,7 +1,7 @@ # The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.75 2005/01/20 16:30:52 albertel Exp $ +# $Id: loncreatecourse.pm,v 1.76 2005/02/17 08:29:42 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -331,8 +331,10 @@ sub print_course_creation_page { 'rshm' => 'Resource Space Home', 'opco' => "Open Course" ); + my $html=&Apache::lonxml::xmlbegin(); $r->print(< +$html + $coursebrowserjs - The LearningOnline Network with CAPA $bodytag @@ -597,9 +598,10 @@ sub create_course { } my $logmsg; + my $html=&Apache::lonxml::xmlbegin(); my $bodytag=&Apache::loncommon::bodytag('Create a New Course'); $r->print(< +$html The LearningOnline Network with CAPA