1 files changed, 1 insertions, 2 deletions
diff --git a/LedgerSMB/Mailer.pm b/LedgerSMB/Mailer.pm
index c7225480..c1128d0e 100755
--- a/LedgerSMB/Mailer.pm
+++ b/LedgerSMB/Mailer.pm
@@ -54,10 +54,9 @@ sub send {
     my $boundary = time;
     $boundary = "LSMB-$boundary";
     $domain =~ s/(.*?\@|>)//g;
-    my $msgid = "$boundary\@$domain";
+    my $msg_id = "$boundary\@$domain";
 
     $self->{contenttype} = "text/plain" unless $self->{contenttype};
-    my $msgid = "$boundary\@$domain";
 
     for (qw(from to cc bcc)) {
         $self->{$_} =~ s/\&lt;/</g;