Revision de06210f
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1412 | 1412 |
|
| 1413 | 1413 |
my ($self, $myconfig) = @_; |
| 1414 | 1414 |
|
| 1415 |
if ($standard_dbh && !$standard_dbh->{Active}) {
|
|
| 1416 |
$main::lxdebug->message(LXDebug::INFO, "get_standard_dbh: \$standard_dbh is defined but not Active anymore"); |
|
| 1417 |
undef $standard_dbh; |
|
| 1418 |
} |
|
| 1419 |
|
|
| 1415 | 1420 |
$standard_dbh ||= $self->dbconnect_noauto($myconfig); |
| 1416 | 1421 |
|
| 1417 | 1422 |
$main::lxdebug->leave_sub(2); |
Auch abrufbar als: Unified diff
Wenn get_standard_dbh() merkt, dass $standard_dbh zwar definiert ist aber zwischenzeitlich geschlossen wurde, dann eine Warnung ausgeben und eine neue Verbindung aufbauen.