From b82c504347d444497367f0c8195dbbb8750f54ee Mon Sep 17 00:00:00 2001 From: =?utf8?q?Bernd=20Ble=C3=9Fmann?= Date: Tue, 16 Mar 2021 16:43:25 +0100 Subject: [PATCH] =?utf8?q?Mahnungsbericht:=20Erzeugte=20Dokumente=20anzeig?= =?utf8?q?en=20->=20auch=20Rechnungen=20f.=20Mahngeb=C3=BChren?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- bin/mozilla/dn.pl | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/bin/mozilla/dn.pl b/bin/mozilla/dn.pl index 8f8efc5b6..ec46a4788 100644 --- a/bin/mozilla/dn.pl +++ b/bin/mozilla/dn.pl @@ -448,9 +448,14 @@ sub show_dunning { } if ($::instance_conf->get_doc_storage) { - my @files = SL::File->get_all_versions(object_id => $ref->{id}, - object_type => 'dunning' . $ref->{dunning_level}, - file_type => 'document',); + # object_types dunning1-dunning3 are the dunnings for the according levels. + my @files = SL::File->get_all_versions(object_id => $ref->{id}, + object_type => 'dunning' . $ref->{dunning_level}, + file_type => 'document',); + # object_type dunning is the dunning invoice with the fees. + push @files, SL::File->get_all_versions(object_id => $ref->{id}, + object_type => 'dunning', + file_type => 'document',); if (scalar @files) { my $html = join '
', map { SL::Presenter::FileObject::file_object($_) } @files; my $text = join "\n", map { $_->file_name } @files; -- 2.20.1