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