Revision a16a7068
Von Moritz Bunkus vor mehr als 12 Jahren hinzugefügt
SL/DB/Manager/BackgroundJob.pm | ||
---|---|---|
use SL::DB::Helper::Manager;
|
||
use base qw(SL::DB::Helper::Manager);
|
||
|
||
use SL::DB::Helper::Sorted;
|
||
|
||
sub object_class { 'SL::DB::BackgroundJob' }
|
||
|
||
__PACKAGE__->make_manager_methods;
|
||
|
||
sub _sort_spec {
|
||
return ( default => [ 'next_run_at', 1 ],
|
||
columns => { SIMPLE => 'ALL' } );
|
||
}
|
||
|
||
sub cleanup {
|
||
my $class = shift;
|
||
$class->delete_all(where => [ and => [ type => 'once', last_run_at => { lt => DateTime->now_local->subtract(days => '1') } ] ]);
|
Auch abrufbar als: Unified diff
BackgroundJob-Manager sortierbar machen