--- loncom/interface/lonstatistics.pm 2003/11/11 22:14:28 1.90 +++ loncom/interface/lonstatistics.pm 2004/01/15 03:18:19 1.93 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.90 2003/11/11 22:14:28 matthew Exp $ +# $Id: lonstatistics.pm,v 1.93 2004/01/15 03:18:19 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -225,7 +225,6 @@ sub PrepareClasslist { @SelectedSections = ($ENV{'form.Section'}); } } - &Apache::lonnet::logthis('@SelectedSections = '.join(',',@SelectedSections)); @SelectedSections = ('all') if (! @SelectedSections); foreach (@SelectedSections) { if ($_ eq 'all') { @@ -1106,21 +1105,11 @@ sub handler { } } # - # Set document type for header only - if($r->header_only) { - if ($ENV{'browser.mathml'}) { - $r->content_type('text/xml'); - } else { - $r->content_type('text/html'); - } - &Apache::loncommon::no_cache($r); - $r->send_http_header; - return OK; - } - # # Send the header - $r->content_type('text/html'); + &Apache::loncommon::no_cache($r); + &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; + if ($r->header_only) { return OK; } # # Extract form elements from query string &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, @@ -1128,7 +1117,9 @@ sub handler { 'SelectedStudent']); # # Give the LON-CAPA page header - $r->print(&Apache::lonhtmlcommon::Title('Course Statistics and Charts')); + $r->print(&Apache::lonhtmlcommon::Title('Course Statistics and Charts'). + &Apache::loncommon::help_open_faq(139). + &Apache::loncommon::help_open_bug('Statistics and Charts')); $r->rflush(); # # Either print out a menu for them or send them to a report