projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
SL/Dev/Record.pm - create_invoice_item Beispiel aktualisiert
[kivitendo-erp.git]
/
SL
/
File.pm
diff --git
a/SL/File.pm
b/SL/File.pm
index
2860424
..
79ca3fb
100644
(file)
--- a/
SL/File.pm
+++ b/
SL/File.pm
@@
-122,7
+122,7
@@
sub delete_all {
sub delete {
my ($self, %params) = @_;
sub delete {
my ($self, %params) = @_;
- die "no id or dbfile" unless $params{id} || $params{dbfile};
+ die "no id or dbfile
in delete
" unless $params{id} || $params{dbfile};
my $rc = 0;
eval {
$rc = SL::DB->client->with_transaction(\&_delete, $self, %params);
my $rc = 0;
eval {
$rc = SL::DB->client->with_transaction(\&_delete, $self, %params);
@@
-319,13
+319,18
@@
sub _get_backend {
my ($self, $backend_name) = @_;
my $class = 'SL::File::Backend::' . $backend_name;
my $obj = undef;
my ($self, $backend_name) = @_;
my $class = 'SL::File::Backend::' . $backend_name;
my $obj = undef;
+ die $::locale->text('no backend enabled') if $backend_name eq 'None';
eval {
eval "require $class";
$obj = $class->new;
eval {
eval "require $class";
$obj = $class->new;
- die
'backend not enabled'
unless $obj->enabled;
+ die
$::locale->text('backend "#1" not enabled',$backend_name)
unless $obj->enabled;
1;
} or do {
1;
} or do {
- die 'backend class not found';
+ if ( $obj ) {
+ die $@;
+ } else {
+ die $::locale->text('backend "#1" not found',$backend_name);
+ }
};
return $obj;
}
};
return $obj;
}