From: Bernd Bleßmann <bernd@kivitendo-premium.de>
Date: Wed, 6 Apr 2022 09:45:03 +0000 (+0200)
Subject: SL::File: get_all_versions mit dbfile als Parameter gefixed
X-Git-Tag: kivitendo-mebil_0.1-0~10^2~2^2~60
X-Git-Url: http://wagnertech.de/git?p=kivitendo-erp.git;a=commitdiff_plain;h=f3324b5ad66924333bf2a313974f6d4d21932707

SL::File: get_all_versions mit dbfile als Parameter gefixed
---

diff --git a/SL/File.pm b/SL/File.pm
index 761a0ad7f..81bc75597 100644
--- a/SL/File.pm
+++ b/SL/File.pm
@@ -63,9 +63,9 @@ sub get_all {
 sub get_all_versions {
   my ($self, %params) = @_;
   my @versionobjs;
-  my @fileobjs = $self->get_all(%params);
+  my @fileobjs;
   if ( $params{dbfile} ) {
-    push @fileobjs, SL::File::Object->new(dbfile => $params{db_file}, id => $params{dbfile}->id, loaded => 1);
+    push @fileobjs, SL::File::Object->new(db_file => $params{dbfile}, id => $params{dbfile}->id, loaded => 1);
   } else {
     @fileobjs = $self->get_all(%params);
   }