[libgearman-client-perl] 04/07: Update fix-server-connection-error.patch (source changes)
Nick Morrott
nickm-guest at moszumanska.debian.org
Tue Jul 26 01:36:09 UTC 2016
This is an automated email from the git hooks/post-receive script.
nickm-guest pushed a commit to branch master
in repository libgearman-client-perl.
commit ce48ec291c2a742a112689fab20de52c1f403d4d
Author: Nick Morrott <knowledgejunkie at gmail.com>
Date: Tue Jul 26 01:48:47 2016 +0100
Update fix-server-connection-error.patch (source changes)
---
debian/patches/fix-server-connection-error.patch | 18 +++++++++---------
1 file changed, 9 insertions(+), 9 deletions(-)
diff --git a/debian/patches/fix-server-connection-error.patch b/debian/patches/fix-server-connection-error.patch
index 1bc3cac..5682e22 100644
--- a/debian/patches/fix-server-connection-error.patch
+++ b/debian/patches/fix-server-connection-error.patch
@@ -6,11 +6,11 @@ Bug: https://rt.cpan.org/Ticket/Display.html?id=85191
Forwarded: https://rt.cpan.org/Ticket/Display.html?id=85191
Author: Richard Wallman <wallmari at bossolutions.co.uk>
Reviewed-by: gregor herrmann <gregoa at debian.org>
-Last-Update: 2013-05-11
+Last-Update: 2016-07-26
--- a/lib/Gearman/Worker.pm
+++ b/lib/Gearman/Worker.pm
-@@ -263,6 +263,10 @@
+@@ -271,6 +271,10 @@
# ( js => last_update_time, ... )
my %last_update_time;
@@ -19,18 +19,18 @@ Last-Update: 2013-05-11
+ };
+
while (1) {
+
# "Jobby" job servers are the set of server which we will contact
- # on this pass through the loop, because we need to clear and use
-@@ -278,7 +282,7 @@
+@@ -287,7 +291,7 @@
for (my $i = 0; $i < $js_count; $i++) {
my $js_index = ($i + $js_offset) % $js_count;
- my $js = $jobby_js[$js_index];
-- my $jss = $self->_get_js_sock($js)
-+ my $jss = $self->_get_js_sock($js, on_connect => $on_connect)
+ my $js = $jobby_js[$js_index];
+- my $jss = $self->_get_js_sock($js)
++ my $jss = $self->_get_js_sock($js, on_connect => $on_connect)
or next;
# TODO: add an optional sleep in here for the test suite
-@@ -380,10 +384,6 @@
+@@ -397,10 +401,6 @@
my @jss;
@@ -38,6 +38,6 @@ Last-Update: 2013-05-11
- return Gearman::Util::send_req($_[0], \$presleep_req);
- };
-
- foreach my $js (@{$self->{job_servers}}) {
+ foreach my $js (@{ $self->{job_servers} }) {
my $jss = $self->_get_js_sock($js, on_connect => $on_connect)
or next;
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libgearman-client-perl.git
More information about the Pkg-perl-cvs-commits
mailing list