X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ee2b1ef305f1723d7ad39a44e195c7e15f8af810..b6d6ad18d758a2725f46a6706b709fbf92d8d0eb:/bin/mozilla/sepa.pl

diff --git a/bin/mozilla/sepa.pl b/bin/mozilla/sepa.pl
index ce334b28a..40d2dff79 100755
--- a/bin/mozilla/sepa.pl
+++ b/bin/mozilla/sepa.pl
@@ -40,6 +40,8 @@ sub bank_transfer_add {
     return;
   }
 
+  $_->{checked} = $_->{direct_debit} for @{ $invoices };
+
   my $bank_account_label_sub = sub { $locale->text('Account number #1, bank code #2, #3', $_[0]->{account_number}, $_[0]->{bank_code}, $_[0]->{bank}) };
 
   my $translation_list = GenericTranslations->list(translation_type => 'sepa_remittance_info_pfx');