Revision 57cf17b9
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
| SL/Auth.pm | ||
|---|---|---|
| 611 | 611 |
my $self = shift; |
| 612 | 612 |
my $provided_dbh = shift; |
| 613 | 613 |
|
| 614 |
my $dbh = $provided_dbh || $self->dbconnect(); |
|
| 614 |
my $dbh = $provided_dbh || $self->dbconnect(1); |
|
| 615 |
|
|
| 616 |
return unless $dbh; |
|
| 615 | 617 |
|
| 616 | 618 |
$dbh->begin_work unless $provided_dbh; |
| 617 | 619 |
|
| SL/Dispatcher.pm | ||
|---|---|---|
| 202 | 202 |
|
| 203 | 203 |
$::auth->set_session_value('login', $::form->{login}, 'password', $::form->{password});
|
| 204 | 204 |
$::auth->create_or_refresh_session; |
| 205 |
$::auth->delete_session_value('FLASH')->save_session();
|
|
| 205 |
$::auth->delete_session_value('FLASH');
|
|
| 206 | 206 |
delete $::form->{password};
|
| 207 | 207 |
|
| 208 | 208 |
if ($action) {
|
| ... | ... | |
| 233 | 233 |
$::form = undef; |
| 234 | 234 |
$::myconfig = (); |
| 235 | 235 |
Form::disconnect_standard_dbh; |
| 236 |
$::auth->save_session; |
|
| 236 | 237 |
$::auth->dbdisconnect; |
| 237 | 238 |
|
| 238 | 239 |
$::lxdebug->end_request; |
| SL/Helper/Flash.pm | ||
|---|---|---|
| 16 | 16 |
} |
| 17 | 17 |
|
| 18 | 18 |
sub flash_later {
|
| 19 |
$::auth->set_session_value(FLASH => _store_flash($::auth->get_session_value('FLASH'), @_))->save_session();
|
|
| 19 |
$::auth->set_session_value(FLASH => _store_flash($::auth->get_session_value('FLASH'), @_));
|
|
| 20 | 20 |
} |
| 21 | 21 |
|
| 22 | 22 |
sub render_flash {
|
Auch abrufbar als: Unified diff
Session immer am Ende des Requests speichern
Momentan wird eh am Anfang der Session einmal gespeichert, wenn
Benutzername und Passwort überprüft wurden. Somit erspart man sich
späteres Speichern.