Hello community, here is the log from the commit of package perl-Minion for openSUSE:Factory checked in at 2018-03-14 19:38:09 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Minion (Old) and /work/SRC/openSUSE:Factory/.perl-Minion.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Minion" Wed Mar 14 19:38:09 2018 rev:40 rq:585303 version:8.12 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Minion/perl-Minion.changes 2018-03-02 21:10:25.475710247 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Minion.new/perl-Minion.changes 2018-03-14 19:38:10.683034534 +0100 @@ -1,0 +2,10 @@ +Thu Mar 8 06:32:10 UTC 2018 - co...@suse.com + +- updated to 8.12 + see /usr/share/doc/packages/perl-Minion/Changes + + 8.12 2018-03-07 + - Added parents option to retry and retry_job methods in Minion::Job and + Minion::Backend::Pg. (CandyAngel) + +------------------------------------------------------------------- Old: ---- Minion-8.11.tar.gz New: ---- Minion-8.12.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Minion.spec ++++++ --- /var/tmp/diff_new_pack.vO35au/_old 2018-03-14 19:38:11.483006119 +0100 +++ /var/tmp/diff_new_pack.vO35au/_new 2018-03-14 19:38:11.483006119 +0100 @@ -17,7 +17,7 @@ Name: perl-Minion -Version: 8.11 +Version: 8.12 Release: 0 %define cpan_name Minion Summary: Job queue ++++++ Minion-8.11.tar.gz -> Minion-8.12.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/Changes new/Minion-8.12/Changes --- old/Minion-8.11/Changes 2018-02-28 18:16:44.000000000 +0100 +++ new/Minion-8.12/Changes 2018-03-07 10:51:42.000000000 +0100 @@ -1,4 +1,8 @@ +8.12 2018-03-07 + - Added parents option to retry and retry_job methods in Minion::Job and + Minion::Backend::Pg. (CandyAngel) + 8.11 2018-02-28 - Fixed worker page links in Mojolicious::Plugin::Minion::Admin. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/META.json new/Minion-8.12/META.json --- old/Minion-8.11/META.json 2018-02-28 18:18:03.000000000 +0100 +++ new/Minion-8.12/META.json 2018-03-07 22:29:48.000000000 +0100 @@ -54,6 +54,6 @@ }, "x_IRC" : "irc://irc.perl.org/#mojo" }, - "version" : "8.11", + "version" : "8.12", "x_serialization_backend" : "JSON::PP version 2.97001" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/META.yml new/Minion-8.12/META.yml --- old/Minion-8.11/META.yml 2018-02-28 18:18:03.000000000 +0100 +++ new/Minion-8.12/META.yml 2018-03-07 22:29:48.000000000 +0100 @@ -27,5 +27,5 @@ homepage: http://mojolicious.org license: http://www.opensource.org/licenses/artistic-license-2.0 repository: https://github.com/kraih/minion.git -version: '8.11' +version: '8.12' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/lib/Minion/Backend/Pg.pm new/Minion-8.12/lib/Minion/Backend/Pg.pm --- old/Minion-8.11/lib/Minion/Backend/Pg.pm 2018-02-19 00:53:38.000000000 +0100 +++ new/Minion-8.12/lib/Minion/Backend/Pg.pm 2018-03-07 10:49:28.000000000 +0100 @@ -197,11 +197,12 @@ "update minion_jobs set attempts = coalesce(?, attempts), delayed = (now() + (interval '1 second' * ?)), - priority = coalesce(?, priority), queue = coalesce(?, queue), - retried = now(), retries = retries + 1, state = 'inactive' + parents = coalesce(?, parents), priority = coalesce(?, priority), + queue = coalesce(?, queue), retried = now(), retries = retries + 1, + state = 'inactive' where id = ? and retries = ? returning 1", $options->{attempts}, $options->{delay} // 0, - @$options{qw(priority queue)}, $id, $retries + @$options{qw(parents priority queue)}, $id, $retries )->rows; } @@ -826,6 +827,12 @@ Delay job for this many seconds (from now), defaults to C<0>. +=item parents + + parents => [$id1, $id2, $id3] + +Jobs this job depends on. + =item priority priority => 5 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/lib/Minion/Backend.pm new/Minion-8.12/lib/Minion/Backend.pm --- old/Minion-8.11/lib/Minion/Backend.pm 2018-02-19 00:53:38.000000000 +0100 +++ new/Minion-8.12/lib/Minion/Backend.pm 2018-03-07 10:49:41.000000000 +0100 @@ -589,6 +589,12 @@ Delay job for this many seconds (from now), defaults to C<0>. +=item parents + + parents => [$id1, $id2, $id3] + +Jobs this job depends on. + =item priority priority => 5 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/lib/Minion/Job.pm new/Minion-8.12/lib/Minion/Job.pm --- old/Minion-8.11/lib/Minion/Job.pm 2018-02-19 00:53:38.000000000 +0100 +++ new/Minion-8.12/lib/Minion/Job.pm 2018-03-07 10:48:45.000000000 +0100 @@ -442,6 +442,12 @@ Delay job for this many seconds (from now), defaults to C<0>. +=item parents + + parents => [$id1, $id2, $id3] + +Jobs this job depends on. + =item priority priority => 5 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/lib/Minion.pm new/Minion-8.12/lib/Minion.pm --- old/Minion-8.11/lib/Minion.pm 2018-02-19 00:53:37.000000000 +0100 +++ new/Minion-8.12/lib/Minion.pm 2018-02-28 18:18:42.000000000 +0100 @@ -18,7 +18,7 @@ has remove_after => 172800; has tasks => sub { {} }; -our $VERSION = '8.11'; +our $VERSION = '8.12'; sub add_task { ($_[0]->tasks->{$_[1]} = $_[2]) and return $_[0] } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Minion-8.11/t/pg.t new/Minion-8.12/t/pg.t --- old/Minion-8.11/t/pg.t 2018-02-19 00:53:19.000000000 +0100 +++ new/Minion-8.12/t/pg.t 2018-03-07 10:48:25.000000000 +0100 @@ -776,6 +776,15 @@ $job = $worker->dequeue(0); is $job->id, $id, 'right id'; ok $job->finish, 'job finished'; +$id = $minion->enqueue(test => [] => {parents => [-1]}); +$job = $worker->dequeue(0); +is $job->id, $id, 'right id'; +is_deeply $job->info->{parents}, [-1], 'right parents'; +$job->retry({parents => [-1, -2]}); +$job = $worker->dequeue(0); +is $job->id, $id, 'right id'; +is_deeply $job->info->{parents}, [-1, -2], 'right parents'; +ok $job->finish, 'job finished'; $worker->unregister; # Foreground