X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-CGI-Ex;a=blobdiff_plain;f=lib%2FCGI%2FEx.pm;h=772dcbd12306d69fb83f6cf66b91ec6590bdf6c5;hp=8c5e6b07ba79d01e6264fd760ad70b7b2f900794;hb=8a1796477c5a835d8c124cfa8504909dc786d93b;hpb=8abbacc82b52f460bef67c1923ae98873a95e123 diff --git a/lib/CGI/Ex.pm b/lib/CGI/Ex.pm index 8c5e6b0..772dcbd 100644 --- a/lib/CGI/Ex.pm +++ b/lib/CGI/Ex.pm @@ -24,7 +24,7 @@ use vars qw($VERSION use base qw(Exporter); BEGIN { - $VERSION = '2.08'; + $VERSION = '2.09'; $PREFERRED_CGI_MODULE ||= 'CGI'; @EXPORT = (); @EXPORT_OK = qw(get_form @@ -440,7 +440,9 @@ sub send_status { $r->send_http_header; $r->print($mesg); } else { - # not sure of best way to send the message in MP2 + $r->content_type('text/html'); + $r->print($mesg); + $r->rflush; } } else { print "Status: $code\r\n";