Revision d001c791
Von Sven Schöling vor fast 12 Jahren hinzugefügt
SL/Auth.pm | ||
---|---|---|
713 | 713 |
$main::lxdebug->leave_sub(); |
714 | 714 |
} |
715 | 715 |
|
716 |
sub active_session_ids { |
|
717 |
my $self = shift; |
|
718 |
my $dbh = $self->dbconnect; |
|
719 |
|
|
720 |
my $query = qq|SELECT id FROM auth.session|; |
|
721 |
|
|
722 |
my @ids = selectall_array_query($::form, $dbh, $query); |
|
723 |
|
|
724 |
return @ids; |
|
725 |
} |
|
726 |
|
|
716 | 727 |
sub expire_sessions { |
717 | 728 |
$main::lxdebug->enter_sub(); |
718 | 729 |
|
Auch abrufbar als: Unified diff
cleanup Methode und Manager für CsvImportReport