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