Revision 07036bf1
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 566 | 566 |
|
| 567 | 567 |
my $session_cookie; |
| 568 | 568 |
if (defined $main::auth) {
|
| 569 |
my $uri = $self->_get_request_uri; |
|
| 570 |
my @segments = $uri->path_segments; |
|
| 571 |
pop @segments; |
|
| 572 |
$uri->path_segments(@segments); |
|
| 573 |
|
|
| 569 | 574 |
my $session_cookie_value = $main::auth->get_session_id(); |
| 570 | 575 |
$session_cookie_value ||= 'NO_SESSION'; |
| 571 | 576 |
|
| 572 | 577 |
$session_cookie = $cgi->cookie('-name' => $main::auth->get_session_cookie_name(),
|
| 573 | 578 |
'-value' => $session_cookie_value, |
| 574 |
'-path' => $self->_get_request_uri->path,
|
|
| 579 |
'-path' => $uri->path, |
|
| 575 | 580 |
'-secure' => $ENV{HTTPS});
|
| 576 | 581 |
} |
| 577 | 582 |
|
Auch abrufbar als: Unified diff
Cookie-Base-Path richtig berechnen.
Commit 0c50616fb43bcf934101fadd488278c40317b586 hat den
Cookie-Gültigkeits-Pfad leider inklusive des Scriptnamens gesetzt,
wodurch nur noch Zugriff auf login.pl möglich war.