From 3c1a9a30830f80b19bbd5eaad72329b603f398f8 Mon Sep 17 00:00:00 2001
From: Pedro Melo <melo@simplicidade.org>
Date: Sun, 20 Jul 2014 22:13:21 +0100
Subject: [PATCH] Add private _random_connected_conn() to return one of the
 connect conns

Not really random at this moment...

Signed-off-by: Pedro Melo <melo@simplicidade.org>
---
 lib/AnyEvent/NSQ/Client.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lib/AnyEvent/NSQ/Client.pm b/lib/AnyEvent/NSQ/Client.pm
index 8448b1a..5ea01ad 100644
--- a/lib/AnyEvent/NSQ/Client.pm
+++ b/lib/AnyEvent/NSQ/Client.pm
@@ -116,6 +116,12 @@ sub _start_nsqd_connection {
   return;
 }
 
+## return one connection that is connected
+sub _random_connected_conn {
+  ## FIXME: yeah, Sony-style random going on :)
+  return (values %{ $_[0]{nsqd_conns} })[0]->{conn};
+}
+
 
 #### Hooks for the main states of the connection
 sub _connected {