X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAuth.pm;h=e8d6c72e1f21a69c48ba400b2c21d623232b5f97;hb=96559d73c72fff7e9dff9fbc0fae52dc38d39cca;hp=0171899c4b7c770b64bb29d425592fff140c1593;hpb=81a9ce9b77b4b44edc35f37148cb57bb19fa6cdd;p=kivitendo-erp.git diff --git a/SL/Auth.pm b/SL/Auth.pm index 0171899c4..e8d6c72e1 100644 --- a/SL/Auth.pm +++ b/SL/Auth.pm @@ -37,11 +37,21 @@ sub new { my $self = bless {}, $type; $self->_read_auth_config(%params); - $self->reset; + $self->init; return $self; } +sub init { + my ($self, %params) = @_; + + $self->{SESSION} = { }; + $self->{FULL_RIGHTS} = { }; + $self->{RIGHTS} = { }; + $self->{unique_counter} = 0; + $self->{column_information} = SL::Auth::ColumnInformation->new(auth => $self); +} + sub reset { my ($self, %params) = @_; @@ -50,6 +60,7 @@ sub reset { $self->{RIGHTS} = { }; $self->{unique_counter} = 0; $self->{column_information} = SL::Auth::ColumnInformation->new(auth => $self); + $self->{column_information}->_fetch; $self->{authenticator}->reset; $self->client(undef); @@ -925,7 +936,7 @@ sub all_rights_full { my ($self) = @_; @{ $self->{master_rights} ||= do { - $self->dbconnect->selectall_arrayref("SELECT name, description, category FROM auth.master_rights ORDER BY id"); + $self->dbconnect->selectall_arrayref("SELECT name, description, category FROM auth.master_rights ORDER BY position"); } } }