Revision 4531a6c7
Von Sven Schöling vor mehr als 12 Jahren hinzugefügt
| bin/mozilla/login.pl | ||
|---|---|---|
| 61 | 61 |
$action = 'login'; |
| 62 | 62 |
} |
| 63 | 63 |
if ($action) {
|
| 64 |
%::myconfig = $auth->read_user($form->{login}) if ($form->{login});
|
|
| 64 |
%::myconfig = $auth->read_user(login => $form->{login}) if ($form->{login});
|
|
| 65 | 65 |
$::locale = Locale->new($::myconfig{countrycode}) if $::myconfig{countrycode};
|
| 66 | 66 |
|
| 67 | 67 |
if (SL::Auth::OK != $auth->authenticate($::myconfig{login}, $form->{password})) {
|
| ... | ... | |
| 106 | 106 |
::end_of_request(); |
| 107 | 107 |
} |
| 108 | 108 |
|
| 109 |
my $user = new User $form->{login};
|
|
| 109 |
my $user = User->new(login => $form->{login});
|
|
| 110 | 110 |
|
| 111 | 111 |
# if we get an error back, bale out |
| 112 | 112 |
my $result; |
Auch abrufbar als: Unified diff
Usermaske im Adminbereich vor logins aus sessions geschützt.
Notwendigerweise zusätzlich User->new und Auth->read_user auf %params
umgeschrieben.