]> wagnertech.de Git - mfinanz.git/blobdiff - SL/DB/BackgroundJob.pm
RDBO BackgroundJob(History): Refactoring von Status-Strings
[mfinanz.git] / SL / DB / BackgroundJob.pm
index e8ae55bac9a394448ff16695c250b5b6716e72a5..b567d364e8bcdaf4c8e7c7dc993288c235e78566 100644 (file)
@@ -45,7 +45,7 @@ sub run {
     $history = SL::DB::BackgroundJobHistory
       ->new(package_name => $self->package_name,
             run_at       => $run_at,
-            status       => 'success',
+            status       => SL::DB::BackgroundJobHistory::SUCCESS(),
             result       => $result,
             data         => $self->data);
     $history->save;
@@ -58,7 +58,7 @@ sub run {
     $history = SL::DB::BackgroundJobHistory
       ->new(package_name => $self->package_name,
             run_at       => $run_at,
-            status       => 'failure',
+            status       => SL::DB::BackgroundJobHistory::FAILURE(),
             error_col    => $error,
             data         => $self->data);
     $history->save;