--- loncom/auth/lonroles.pm 2003/03/23 01:46:51 1.53 +++ loncom/auth/lonroles.pm 2003/03/24 14:45:09 1.54 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # User Roles Screen # -# $Id: lonroles.pm,v 1.53 2003/03/23 01:46:51 www Exp $ +# $Id: lonroles.pm,v 1.54 2003/03/24 14:45:09 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -104,13 +104,13 @@ sub handler { # student attempts to register a new key } else { # print form to enter a new key - $r->content_type('text/html'); - &Apache::loncommon::no_cache($r); - $r->send_http_header; - my $swinfo=&Apache::lonmenu::rawconfig(); - my $bodytag=&Apache::loncommon::bodytag - ('Enter Access Key to Unlock this Course'); - $r->print(<content_type('text/html'); + &Apache::loncommon::no_cache($r); + $r->send_http_header; + my $swinfo=&Apache::lonmenu::rawconfig(); + my $bodytag=&Apache::loncommon::bodytag + ('Enter Access Key to Unlock this Course'); + $r->print(<Entering Course Access Key @@ -125,6 +125,7 @@ $swinfo ENDENTERKEY + return OK; } } }