$self->process;
- my $type = 'text/html';
+ my $type = 'application/xhtml+xml';
my $body;
if ($self->{XML}){
$type = 'text/xml';
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;