X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/76a25c8c3358c474c68fa3dbb777c51479c8e496..01204ffdc7790d1d497b7f591e940d50e7c714a7:/SL/Auth.pm diff --git a/SL/Auth.pm b/SL/Auth.pm index 77ea226ae..ff77bfcc7 100644 --- a/SL/Auth.pm +++ b/SL/Auth.pm @@ -615,7 +615,7 @@ sub save_session { my $dbh = $provided_dbh || $self->dbconnect(1); - $::lxdebug->leave_sub && return unless $dbh; + $::lxdebug->leave_sub && return unless $dbh && $session_id; $dbh->begin_work unless $provided_dbh;