--- loncom/interface/Attic/londropadd.pm 2002/09/13 18:59:02 1.45.6.1 +++ loncom/interface/Attic/londropadd.pm 2002/08/22 21:05:25 1.47 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to drop and add students in courses # -# $Id: londropadd.pm,v 1.45.6.1 2002/09/13 18:59:02 matthew Exp $ +# $Id: londropadd.pm,v 1.47 2002/08/22 21:05:25 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -59,15 +59,13 @@ use Apache::Constants qw(:common :http R # ================================================================ Print header sub header { + my $bodytag=&Apache::loncommon::bodytag('Enrollment Manager'); return(< LON-CAPA Enrollment Manager - - -

$ENV{'course.'.$ENV{'request.course.id'}.'.description'}

-

Enrollment Manager

+$bodytag
ENDHEAD