Revision 64e47b81
Von Moritz Bunkus vor fast 17 Jahren hinzugefügt
bin/mozilla/login.pl | ||
---|---|---|
68 | 68 |
# window title bar, user info |
69 | 69 |
$form->{titlebar} = "Lx-Office " . $locale->text('Version') . " $form->{version}"; |
70 | 70 |
|
71 |
if ($form->{action}) { |
|
71 |
my $action = $form->{action}; |
|
72 |
|
|
73 |
if (!$action && $auth->{SESSION}->{login}) { |
|
74 |
$action = 'login'; |
|
75 |
} |
|
76 |
|
|
77 |
if ($action) { |
|
72 | 78 |
our %myconfig = $auth->read_user($form->{login}) if ($form->{login}); |
73 | 79 |
|
74 | 80 |
if (!$myconfig{login} || (SL::Auth::OK != $auth->authenticate($form->{login}, $form->{password}, 0))) { |
... | ... | |
81 | 87 |
$auth->create_or_refresh_session(); |
82 | 88 |
|
83 | 89 |
$form->{titlebar} .= " - $myconfig{name} - $myconfig{dbname}"; |
84 |
call_sub($locale->findsub($form->{action}));
|
|
90 |
call_sub($locale->findsub($action));
|
|
85 | 91 |
|
86 | 92 |
} else { |
87 | 93 |
login_screen(); |
Auch abrufbar als: Unified diff
Wenn man nach einem erfolgreichen Login die selbe Installation in einem zweiten Browserfenster öffnet, so wird gleich die Startseite angezeigt und nicht mehr das Login. Technisch ausgedrückt: Wenn "login.pl" aufgerufen wird, keine Aktion übergeben wird und eine gültige Session vorliegt, dann wird der Loginbildschirm umgangen.