Revision 5b43c81a
| SL/DB.pm | ||
|---|---|---|
| 142 | 142 |
if (blessed $error) {
|
| 143 | 143 |
if ($error->isa('SL::X::DBError')) {
|
| 144 | 144 |
# gobble the exception |
| 145 |
} elsif ($error->isa('SL::Locale::String')) {
|
|
| 146 |
die $self->error; |
|
| 147 |
} else {
|
|
| 145 |
} elsif ($error->can('rethrow')) {
|
|
| 148 | 146 |
$error->rethrow; |
| 147 |
} else {
|
|
| 148 |
croak $self->error; |
|
| 149 | 149 |
} |
| 150 | 150 |
} else {
|
| 151 | 151 |
die $self->error; |
Auch abrufbar als: Unified diff
Falls ein DB-Fehler nicht rethrowable ist, die klassische Meldung ausgeben