Small patch to fix pjf#53

techman83 · May 25, 2014 · 9c518ac · 9c518ac
1 parent 1f3cbe8
commit 9c518ac
Showing 1 changed file with 19 additions and 0 deletions.
diff --git a/lib/Exobrain.pm b/lib/Exobrain.pm
@@ -218,6 +218,25 @@ method watch_loop(
     }
 }
 
+=method zconnect
+
+    $exobrain->zconnect();
+
+ZeroMQ takes some time to setup the initial connection. Calling connect
+prior to sending your first message will avoid it disappearing.
+
+=cut
+
+method zconnect() {
+    my $connect = Exobrain::Message::Raw->new(
+        data => { message => 'Starting Connection...' }, 
+        summary => 'Starting Connection...', 
+        namespace => 'Exobrain'
+    );
+    select(undef, undef, undef, 0.1); # sleep for 100ms
+    return $connect;
+}
+
 =method notify
 
     $exobrain->notify($msg