Perl-Datenbank-Upgradescripte auf Objektorientierung & strict umgestellt

[kivitendo-erp.git] / sql / Pg-upgrade2 / self_test_background_job.pl

diff --git a/sql/Pg-upgrade2/self_test_background_job.pl b/sql/Pg-upgrade2/self_test_background_job.pl
index 796c6c9..468b79c 100644 (file)
--- a/sql/Pg-upgrade2/self_test_background_job.pl
+++ b/sql/Pg-upgrade2/self_test_background_job.pl
@@ -1,12 +1,18 @@
 # @tag: self_test_background_job
 # @description: Hintergrundjob für tägliche Selbsttests
 # @depends: release_2_7_0
-# @charset: utf-8
+package SL::DBUpgrade2::self_test_background_job;
 
 use strict;
+use utf8;
+
+use parent qw(SL::DBUpgrade2::Base);
 
 use SL::BackgroundJob::SelfTest;
 
-SL::BackgroundJob::SelfTest->create_job;
+sub run {
+  SL::BackgroundJob::SelfTest->create_job;
+  return 1;
+}
 
 1;