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 2a876a4cbff879584af9340606726bedb4e5f183..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';
@@ -125,11 +126,6 @@ sub render : method {
        my $output = $template->output;
        print header(-type=> $type, -charset => 'utf-8', -Content_Length => length $output);
        print $output;
-
-
-       $DBH->rollback unless $DBH->{AutoCommit};
-       $DBH->disconnect;
-
 };
 
 1;