Für t/file/filesystem.t Anpassungen im Debug und Fehlermeldung

[kivitendo-erp.git] / SL / File.pm

diff --git a/SL/File.pm b/SL/File.pm
index 31bebcf..3384f29 100644 (file)
--- a/SL/File.pm
+++ b/SL/File.pm
@@ -126,7 +126,7 @@ sub delete {
   my $rc = SL::DB->client->with_transaction(\&_delete, $self, %params);
   if (!$rc) {
     my $err = SL::DB->client->error;
-    die (ref $err?$$err:$err);
+    die $err?(ref $err?$$err:$err):"unknown err";
   }
   return $rc;
 }