Revision 660c7e53
Von Sven Schöling vor mehr als 8 Jahren hinzugefügt
SL/Form.pm | ||
---|---|---|
}
|
||
|
||
sub dberror {
|
||
$main::lxdebug->enter_sub();
|
||
|
||
my ($self, $msg) = @_;
|
||
|
||
$self->error("$msg\n" . $DBI::errstr);
|
||
|
||
$main::lxdebug->leave_sub();
|
||
die SL::X::DBError->new(
|
||
msg => $msg,
|
||
error => $DBI::errstr,
|
||
);
|
||
}
|
||
|
||
sub isblank {
|
Auch abrufbar als: Unified diff
DB Transaktionen - Fehler nach oben durchreichen