Hintergrundjobs-Controller: nur Perl-Job-Klassen anzeigen

Wenn in der Tabelle noch Jobs aus anderen Systemen (alt-Bob) stehen,
dann dürfen die von der Perl-Seite aus weder konfiguriert noch
ausgeführt werden können.

diff --git a/SL/Controller/BackgroundJob.pm b/SL/Controller/BackgroundJob.pm
index 0ff74590ad5b798d8aff64d524c4413d623d1674..b688297971b088d392a8f0fb332c09bb545d4c5f 100644 (file)
--- a/SL/Controller/BackgroundJob.pm
+++ b/SL/Controller/BackgroundJob.pm
@@ -167,6 +167,9 @@ sub init_models {
       last_run_at  => t8('Last run at'),
       next_run_at  => t8('Next run at'),
     },
       last_run_at  => t8('Last run at'),
       next_run_at  => t8('Next run at'),
     },

+    query => [
+      package_name => [ SL::BackgroundJob::Base->get_known_job_classes ],
+    ],

   );
 }
 
   );
 }