--- loncom/interface/lonmanagekeys.pm 2003/05/02 19:00:29 1.11 +++ loncom/interface/lonmanagekeys.pm 2003/09/23 00:26:10 1.13 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to manage course access keys # -# $Id: lonmanagekeys.pm,v 1.11 2003/05/02 19:00:29 www Exp $ +# $Id: lonmanagekeys.pm,v 1.13 2003/09/23 00:26:10 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -36,6 +36,7 @@ use Apache::loncommon(); use Apache::lonhtmlcommon(); use Apache::Constants qw(:common :http REDIRECT); use Spreadsheet::WriteExcel; +use Apache::lonlocal; ############################################################### ############################################################### @@ -174,7 +175,7 @@ sub addcom { sub handler { my $r=shift; if ($r->header_only) { - $r->content_type('text/html'); + &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; return OK; } @@ -207,7 +208,7 @@ sub handler { # # Normal web stuff # - $r->content_type('text/html'); + &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; $r->print(&header()); @@ -232,11 +233,12 @@ sub handler { &addcom(%cenv); } # --- Menu - $r->print('