package SL::Template::XML;
-use SL::Template::HTML;
-
-use vars qw(@ISA);
-
-@ISA = qw(SL::Template::HTML);
+use parent qw(SL::Template::HTML);
use strict;
sub get_mime_type() {
my ($self) = @_;
- if ($self->{"form"}->{"format"} =~ /elsterwinston/i) {
- return "application/xml ";
- } elsif ($self->{"form"}->{"format"} =~ /elstertaxbird/i) {
- return "application/x-taxbird";
- } else {
- return "text";
- }
+ return "text";
+
}
sub uses_temp_file {