Revision b2d2a98c
Von Moritz Bunkus vor etwa 16 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 57 | 57 |
|
| 58 | 58 |
my $standard_dbh; |
| 59 | 59 |
|
| 60 |
sub DESTROY {
|
|
| 60 |
END {
|
|
| 61 | 61 |
if ($standard_dbh) {
|
| 62 | 62 |
$standard_dbh->disconnect(); |
| 63 | 63 |
undef $standard_dbh; |
Auch abrufbar als: Unified diff
Konzeptioneller Fehler. Da es mehr als ein Form-Objekt geben kann (in diesem Falle beim Wiederherstellen von $form mittels restore_form()), darf das Standard-Datenbankhandle nicht geschlossen werden, wenn ein Form-Objekt vernichtet wird, sondern erst, wenn das Programm beendet wird.