Return to lonchat.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.8, 2005/02/17 08:29:42 | version 1.9, 2005/02/17 08:50:20 |
---|---|
Line 34 use Apache::loncommon; | Line 34 use Apache::loncommon; |
sub handler { | sub handler { |
my $r = shift; | my $r = shift; |
$r->content_type('text/html'); | &Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; | $r->send_http_header; |
return OK if $r->header_only; | return OK if $r->header_only; |
if (! &Apache::lonnet::allowed('plc',$ENV{'request.course.id'}. | if (! &Apache::lonnet::allowed('plc',$ENV{'request.course.id'}. |