X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/49c7621e7bd48352be257e6ceea0e6fbb1718516..f0e64d77dee59da736fc61304e45ad50210faa55:/SL/Mailer.pm?ds=sidebyside

diff --git a/SL/Mailer.pm b/SL/Mailer.pm
index 5e280128b..02b117398 100644
--- a/SL/Mailer.pm
+++ b/SL/Mailer.pm
@@ -36,6 +36,8 @@ use SL::Common;
 use SL::MIME;
 use SL::Template;
 
+use strict;
+
 my $num_sent = 0;
 
 sub new {
@@ -184,7 +186,7 @@ $self->{message}
 
       my $application    = ($attachment =~ /(^\w+$)|\.(html|text|txt|sql)$/) ? "text" : "application";
       my $content_type   = SL::MIME->mime_type_from_ext($filename);
-      $content_type      = "${application}/${self->{format}}" if (!$content_type && $self->{format});
+      $content_type      = "${application}/$self->{format}" if (!$content_type && $self->{format});
       $content_type    ||= 'application/octet-stream';
 
       open(IN, $attachment);