dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Catch DBI execution error (#1263)

Browse Source
This commit is contained in:
Clément Oudot 2017-08-29 14:04:40 +00:00
parent 095a6ed8e5
commit 2ec88532ad
2 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf/Backends/CDBI.pm
View File

@ -28,7 +28,9 @@ sub store {
$self->logError;
return UNKNOWN_ERROR;
}
unless ( $req->execute( $fields, $cfgNum ) ) {
my $execute;
eval { $execute = $req->execute( $fields, $cfgNum ); };
unless ($execute) {
$self->logError;
return UNKNOWN_ERROR;
}

4
lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf/Backends/RDBI.pm
View File

@ -38,7 +38,9 @@ sub store {
@execValues = ( $k, $v, $cfgNum, $k );
}
else { @execValues = ( $cfgNum, $k, $v ); }
unless ( $req->execute(@execValues) ) {
my $execute;
eval { $execute = $req->execute(@execValues); };
unless ($execute) {
$self->logError;
$self->_dbh->do("ROLLBACK");
return UNKNOWN_ERROR;