Revision cb347e6a
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
SL/Dispatcher.pm | ||
---|---|---|
223 | 223 |
$::form->{action} =~ s/( |-|,|\#)/_/g; |
224 | 224 |
|
225 | 225 |
($script, $path, $suffix) = fileparse($script_name, ".pl"); |
226 |
require_main_code($script, $suffix); |
|
226 |
require_main_code($script, $suffix) unless $script eq 'admin';
|
|
227 | 227 |
|
228 | 228 |
$::form->{script} = $script . $suffix; |
229 | 229 |
|
... | ... | |
248 | 248 |
_require_controller('LoginScreen'); |
249 | 249 |
} |
250 | 250 |
|
251 |
if (($script eq 'login') && !$action) { |
|
252 |
print $::request->{cgi}->redirect('controller.pl?action=LoginScreen/user_login'); |
|
253 |
|
|
254 |
} elsif ($script eq 'admin') { |
|
255 |
::run($session_result); |
|
251 |
if ((($script eq 'login') && !$action) || ($script eq 'admin')) { |
|
252 |
$self->redirect_to_login($script); |
|
256 | 253 |
|
257 | 254 |
} else { |
258 | 255 |
$self->redirect_to_login($script) if SL::Auth::SESSION_EXPIRED == $session_result; |
Auch abrufbar als: Unified diff
Alle Anfragen auf admin.pl auf neuen Admin-Controller umleiten