X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAuth%2FSessionValue.pm;h=0950a46b95c1ca217472110cd2a2828908e4e5e4;hb=958b82d600cebec78ff208257b1fd348ee0439bf;hp=3cc80bb6fdf832ed323deba53f4a33550a5fd27e;hpb=6bab0fff323c36de9e247487f043da1b29dea6fd;p=kivitendo-erp.git diff --git a/SL/Auth/SessionValue.pm b/SL/Auth/SessionValue.pm index 3cc80bb6f..0950a46b9 100644 --- a/SL/Auth/SessionValue.pm +++ b/SL/Auth/SessionValue.pm @@ -16,7 +16,7 @@ sub new { my $self = bless {}, $class; - map { $self->{$_} = $params{$_} } qw(auth key value auto_restore); + map { $self->{$_} = $params{$_} } qw(auth key value auto_restore modified); $self->{fetched} = exists $params{value}; $self->{parsed} = !$params{raw} && exists $params{value}; @@ -46,6 +46,7 @@ sub _fetch { my ($self) = @_; return $self if $self->{fetched}; + return $self if !$self->{auth}->session_tables_present; my $dbh = $self->{auth}->dbconnect; my $query = qq|SELECT sess_value FROM auth.session_content WHERE (session_id = ?) AND (sess_key = ?)|;