[SCM] libmessage-passing-perl Debian packaging branch, master, updated. debian/0.111-3-14-g44f6e88

Tomas Doran bobtfish at bobtfish.net
Mon May 6 11:57:08 UTC 2013


The following commit has been merged in the master branch:
commit 2e75ab8366db3e84dab6eb3753df0ea1b0f5306c
Author: Tomas Doran <bobtfish at bobtfish.net>
Date:   Sat Jun 9 11:11:39 2012 +0100

    Get rid of spurious warnings

diff --git a/Changes b/Changes
index a31d3d5..8f464c5 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,5 @@
+  - Remove spurious warnings from reconnect code.
+
 0.006
   - Rip JSON encoders and decoders out of inputs and
     outputs, making them optional and/or replaceable.
diff --git a/lib/Message/Passing/Role/ConnectionManager.pm b/lib/Message/Passing/Role/ConnectionManager.pm
index 7a55e88..1f85f7d 100644
--- a/lib/Message/Passing/Role/ConnectionManager.pm
+++ b/lib/Message/Passing/Role/ConnectionManager.pm
@@ -54,7 +54,6 @@ sub _build_timeout_timer {
         after => $self->timeout,
         cb => sub {
             $self->_timeout_timer(undef);
-            warn "TIMEOUT";
             $self->_set_connected(0); # Use public API, causing reconnect timer to be built
         },
     );
@@ -63,11 +62,9 @@ sub _build_timeout_timer {
 sub _build_reconnect_timer {
     my $self = shift;
     weaken($self);
-    warn "Build reconnect timer";
     AnyEvent->timer(
         after => $self->reconnect_after,
         cb => sub {
-            warn "Am reconnecting";
             $self->_timeout_timer(undef);
             $self->connection; # Just rebuild the connection object
         },

-- 
libmessage-passing-perl Debian packaging



More information about the Pkg-perl-cvs-commits mailing list