sub get_mime_type() {
my ($self) = @_;
- if ($self->{"form"}->{"format"} =~ /xml/i) {
+ if ($self->{"form"}->{"format"} =~ /elsterwinston/i) {
return "application/xml ";
+ } elsif ($self->{"form"}->{"format"} =~ /elstertaxbird/i) {
+ return "application/x-taxbird";
} else {
- return "text/xml";
+ return "text";
}
}
sub uses_temp_file {
-# my ($self) = @_;
- # no tempfile needet for XML Output
+ # tempfile needet for XML Output
return 1;
}