X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAuth.pm;h=3b14def5d3ae88081ed549d6b94f15a26753af96;hb=66ddc388f22a78ff14f7705a0d3d601e81440e04;hp=978fe497d80bff499c8a1fda2cffb5be70342feb;hpb=7f34b3c1f69619eaf3c41945ab22cf21883bb945;p=kivitendo-erp.git

diff --git a/SL/Auth.pm b/SL/Auth.pm
index 978fe497d..3b14def5d 100644
--- a/SL/Auth.pm
+++ b/SL/Auth.pm
@@ -36,6 +36,15 @@ sub new {
   return $self;
 }
 
+sub reset {
+  my ($self, %params) = @_;
+
+  $self->{SESSION}          = { };
+  $self->{FULL_RIGHTS}      = { };
+  $self->{RIGHTS}           = { };
+  $self->{unique_counter}   = 0;
+}
+
 sub get_user_dbh {
   my ($self, $login) = @_;
   my %user = $self->read_user($login);