X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=SL%2FForm.pm;h=d85fe54daf8329ec606f67241e5f566e26d59563;hb=91ee6cb28c37fe07d001da04808f9c49e1959502;hp=5f0fcd756ea7e0f570e24828718558fb20d098fd;hpb=53d06080bc6bc5cc978ab3351628cffcf0658029;p=kivitendo-erp.git diff --git a/SL/Form.pm b/SL/Form.pm index 5f0fcd756..d85fe54da 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -566,12 +566,17 @@ sub create_http_response { my $session_cookie; if (defined $main::auth) { + my $uri = $self->_get_request_uri; + my @segments = $uri->path_segments; + pop @segments; + $uri->path_segments(@segments); + my $session_cookie_value = $main::auth->get_session_id(); $session_cookie_value ||= 'NO_SESSION'; $session_cookie = $cgi->cookie('-name' => $main::auth->get_session_cookie_name(), '-value' => $session_cookie_value, - '-path' => $self->_get_request_uri->path, + '-path' => $uri->path, '-secure' => $ENV{HTTPS}); }