Fix. bug ledgersmb#1186 - doubled email addresses in emailing invoice

pongraczi · Aug 24, 2014 · 571a10a · 571a10a
1 parent 161f7e7
commit 571a10a
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/LedgerSMB/AA.pm b/LedgerSMB/AA.pm
@@ -1358,10 +1358,17 @@ sub get_name {
     	       16 => 'cc',
     	       17 => 'bcc' );
     $sth = $dbh->prepare($query);
-    $sth->execute( $form->{eca_id}, 17) || $self->dberror( $query );
+    $sth->execute( $form->{eca_id}, 17) || $form->dberror( $query );
 
     my $ctype;
     my $billing_email = 0;
+
+    # Set these variables to empty, otherwise in some cases it keeps earlier values and cause doubled
+    # values, ie. when emailing invoice
+    $form->{email} = '';
+    $form->{cc} = '';
+    $form->{bcc} = '';
+
     while ( $ref = $sth->fetchrow_hashref('NAME_lc') ) {
         $ctype = $ref->{class_id};
         $ctype = $id_map{$ctype};