--- loncom/interface/lonparmset.pm 2003/03/13 20:52:47 1.84 +++ loncom/interface/lonparmset.pm 2003/04/18 15:24:53 1.87 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.84 2003/03/13 20:52:47 bowersj2 Exp $ +# $Id: lonparmset.pm,v 1.87 2003/04/18 15:24:53 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -285,8 +285,6 @@ sub plink { sub startpage { my ($r,$id,$udom,$csec,$uname)=@_; - $r->content_type('text/html'); - $r->send_http_header; my $bodytag=&Apache::loncommon::bodytag('Set Course Parameters','', 'onUnload="pclose()"'); @@ -1570,7 +1568,7 @@ Main handler. Calls &assessparms and &c ################################################## ################################################## - + use Data::Dumper; sub handler { my $r=shift; @@ -1581,6 +1579,9 @@ sub handler { } &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}); + $r->content_type('text/html'); + $r->send_http_header; + # ----------------------------------------------------- Needs to be in a course if (($ENV{'request.course.id'}) &&