Revision 12e76514
Von Bernd Bleßmann vor mehr als 5 Jahren hinzugefügt
| SL/Dispatcher.pm | ||
|---|---|---|
|
|
||
|
my $redirect_url = "controller.pl?action=${action}";
|
||
|
|
||
|
if ($action =~ m/LoginScreen\/user_login/) {
|
||
|
if ( $action =~ m/LoginScreen\/user_login/
|
||
|
&& $params{action}
|
||
|
&& 'get' eq lc($ENV{REQUEST_METHOD})
|
||
|
) {
|
||
|
|
||
|
require SL::Controller::Base;
|
||
|
my $controller = SL::Controller::Base->new;
|
||
|
|
||
|
delete $params{error};
|
||
|
delete $params{routing_type};
|
||
|
delete @{ $::form }{ grep { m/^\{AUTH\}/ } keys %{ $::form } };
|
||
|
|
||
|
my $callback = $controller->url_for(%params, %{$::form});
|
||
|
$redirect_url .= '&callback=' . uri_encode($callback);
|
||
|
}
|
||
Auch abrufbar als: Unified diff
Login: Callback nur bauen bei GET-Request und wenn action vorhanden