Revision 7bd555b6
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
SL/Dispatcher.pm | ||
---|---|---|
179 | 179 |
$::locale = undef; |
180 | 180 |
$::form = undef; |
181 | 181 |
$::myconfig = (); |
182 |
Form::disconnect_standard_dbh(); |
|
182 | 183 |
|
183 | 184 |
$::lxdebug->end_request; |
184 | 185 |
$::lxdebug->leave_sub; |
SL/Form.pm | ||
---|---|---|
63 | 63 |
my $standard_dbh; |
64 | 64 |
|
65 | 65 |
END { |
66 |
if ($standard_dbh) { |
|
67 |
$standard_dbh->disconnect(); |
|
68 |
undef $standard_dbh; |
|
69 |
} |
|
66 |
disconnect_standard_dbh(); |
|
67 |
} |
|
68 |
|
|
69 |
sub disconnect_standard_dbh { |
|
70 |
return unless $standard_dbh; |
|
71 |
$standard_dbh->disconnect(); |
|
72 |
undef $standard_dbh; |
|
70 | 73 |
} |
71 | 74 |
|
72 | 75 |
sub _store_value { |
Auch abrufbar als: Unified diff
Nach jedem Request die Standard-Datenbankverbindung schließen