serve as text/html for msie

[ndwebbie.git] / ND / Web / XMLPage.pm

diff --git a/ND/Web/XMLPage.pm b/ND/Web/XMLPage.pm
index 561fdc8f608c9535c91219eb13239916ca76ce56..68fd96b246b078f333d9dcd770fc4a432a0c26df 100644 (file)
--- a/ND/Web/XMLPage.pm
+++ b/ND/Web/XMLPage.pm
@@ -79,7 +79,8 @@ sub render : method {
 
        $self->process;
 
-       my $type = 'text/html';
+       my $type = 'application/xhtml+xml';
+       $type = 'text/html' if $self->{USER_AGENT} =~ /MSIE/;
        my $body;
        if ($self->{XML}){
                $type = 'text/xml';