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