Revision b513b1ef
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
| SL/Auth.pm | ||
|---|---|---|
| 496 | 496 |
$sth = prepare_execute_query($form, $dbh, $query, $session_id); |
| 497 | 497 |
|
| 498 | 498 |
while (my $ref = $sth->fetchrow_hashref()) {
|
| 499 |
my $value = $self->_load_value($ref->{sess_value});
|
|
| 500 |
$self->{SESSION}->{$ref->{sess_key}} = $value;
|
|
| 501 |
$form->{$ref->{sess_key}} = $value if (!defined $form->{$ref->{sess_key}});
|
|
| 499 |
$self->{SESSION}->{$ref->{sess_key}} = $ref->{sess_value};
|
|
| 500 |
$form->{$ref->{sess_key}} = $self->_load_value($ref->{sess_value}) if (!defined $form->{$ref->{sess_key}});
|
|
| 502 | 501 |
} |
| 503 | 502 |
|
| 504 | 503 |
$sth->finish(); |
Auch abrufbar als: Unified diff
Laden von ge-YAML-dumpten Session-Inhalten gefixt