X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/07aa9777cf738d91300ebfc2c4fce7bab465a303..a0392369b75efa2fa8958f5cf2519272c960040d:/SL/Controller/File.pm

diff --git a/SL/Controller/File.pm b/SL/Controller/File.pm
index 1a244f018..fdfded276 100644
--- a/SL/Controller/File.pm
+++ b/SL/Controller/File.pm
@@ -399,7 +399,7 @@ sub _do_list {
   if ( $self->file_type eq 'document' ) {
     my @object_types;
     push @object_types, $self->object_type;
-    push @object_types, qw(dunning dunning1 dunning2 dunning3 dunning_orig_invoice) if $self->object_type eq 'invoice'; # hardcoded object types?
+    push @object_types, qw(dunning1 dunning2 dunning3 dunning_invoice dunning_orig_invoice) if $self->object_type eq 'invoice'; # hardcoded object types?
     @files = SL::File->get_all_versions(object_id   => $self->object_id,
                                         object_type => \@object_types,
                                         file_type   => $self->file_type,