X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FFile%2FBackend%2FFilesystem.pm;h=19d81e334930cd0a8bbfd2ada4f17467d03bc8b2;hb=a6ce2c7f3f7ae10f7065fb86121c8d11049617ee;hp=a706c38202ac615d5a5e07931b594ba641cbfd86;hpb=8c7f25bcd4da160b26527fa23a2e598476dc052d;p=kivitendo-erp.git diff --git a/SL/File/Backend/Filesystem.pm b/SL/File/Backend/Filesystem.pm index a706c3820..19d81e334 100644 --- a/SL/File/Backend/Filesystem.pm +++ b/SL/File/Backend/Filesystem.pm @@ -54,8 +54,6 @@ sub rename { sub save { my ($self, %params) = @_; die 'dbfile not exists' unless $params{dbfile}; - $main::lxdebug->message(LXDebug->DEBUG2(), "in backend " . $self . " file " . $params{dbfile}); - $main::lxdebug->message(LXDebug->DEBUG2(), "file id=" . $params{dbfile}->id . " path=" . $params{file_path}); my $dbfile = $params{dbfile}; die 'no file contents' unless $params{file_path} || $params{file_contents}; $dbfile->backend_data(0) unless $dbfile->backend_data; @@ -63,7 +61,6 @@ sub save { $dbfile->save->load; my $tofile = $self->_filesystem_path($dbfile); - $main::lxdebug->message(LXDebug->DEBUG2(), "topath=" . $tofile . " from=" . $params{file_path}); if ($params{file_path} && -f $params{file_path}) { File::Copy::copy($params{file_path}, $tofile); } @@ -85,7 +82,7 @@ sub get_mtime { my ($self, %params) = @_; die "no dbfile" unless $params{dbfile}; $main::lxdebug->message(LXDebug->DEBUG2(), "version=" .$params{version}); - die "unknown version" if $params{version} && + die "unknown version" if $params{version} && ($params{version} < 0 || $params{version} > $params{dbfile}->backend_data) ; my $path = $self->_filesystem_path($params{dbfile},$params{version}); die "no file found in backend" if !-f $path; @@ -181,5 +178,3 @@ L Martin Helmling Emartin.helmling@opendynamic.deE =cut - -