Revision 9122bdf7
Von Sven Schöling vor mehr als 13 Jahren hinzugefügt
SL/Auth.pm | ||
---|---|---|
632 | 632 |
} |
633 | 633 |
|
634 | 634 |
sub save_session { |
635 |
$::lxdebug->enter_sub; |
|
635 | 636 |
my $self = shift; |
636 | 637 |
my $provided_dbh = shift; |
637 | 638 |
|
638 | 639 |
my $dbh = $provided_dbh || $self->dbconnect(1); |
639 | 640 |
|
640 |
return unless $dbh; |
|
641 |
$::lxdebug->leave_sub && return unless $dbh;
|
|
641 | 642 |
|
642 | 643 |
$dbh->begin_work unless $provided_dbh; |
643 | 644 |
|
... | ... | |
656 | 657 |
} |
657 | 658 |
|
658 | 659 |
$dbh->commit() unless $provided_dbh; |
660 |
$::lxdebug->leave_sub; |
|
659 | 661 |
} |
660 | 662 |
|
661 | 663 |
sub set_session_value { |
Auch abrufbar als: Unified diff
enter_sub/leave_sub in Auth::save_session