--- loncom/homework/imagechoice.pm 2004/09/09 20:35:10 1.6 +++ loncom/homework/imagechoice.pm 2005/02/17 09:01:03 1.7 @@ -1,4 +1,4 @@ -# $Id: imagechoice.pm,v 1.6 2004/09/09 20:35:10 albertel Exp $ +# $Id: imagechoice.pm,v 1.7 2005/02/17 09:01:03 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -217,7 +217,8 @@ sub drawimage { sub handler { my ($r)=@_; - $r->content_type('text/html'); + &Apache::loncommon::content_type($r,'text/html'); + $r->send_http_header; my %data; my (undef,$id) = split(/=/,$ENV{'QUERY_STRING'}); my $filename = &Apache::lonnet::unescape($ENV{"imagechoice.$id.file"});