[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:56:55 UTC 2013


The following commit has been merged in the master branch:
commit e98b80fa9e60bce68b9d0280b49494481183eead
Author: Tomas Doran <bobtfish at bobtfish.net>
Date:   Mon Apr 30 09:09:10 2012 +0100

    dsl bug

diff --git a/t/dsl.t b/t/dsl.t
index 462f8fc..965a30a 100644
--- a/t/dsl.t
+++ b/t/dsl.t
@@ -30,5 +30,45 @@ my $test = $c->output_to->output_to->output_to->[0];
 is $test->message_count, 1;
 is_deeply [$test->messages], [{foo => 'bar'}];
 
+$c = log_chain {
+            output logcollector_central => (
+                class => 'ZeroMQ',
+                connect => "tcp://127.0.0.1:5223",
+            );
+            output webhook_distributor => (
+                class => 'ZeroMQ',
+                connect => "tcp://127.0.0.1:5227",
+            );
+            filter webhook_distributor_filter => (
+                class => 'All', # FIXME
+                output_to => 'webhook_distributor',
+            );
+            output esl_incoming_fanout => (
+                class => 'ZeroMQ',
+                connect => "tcp://127.0.0.1:5225",
+            );
+            filter esl_incoming_fanout_filter => (
+                class => 'All', # FIXME
+                output_to => 'esl_incoming_fanout',
+            );
+            filter t => (
+                class => 'T',
+                output_to => [qw/
+                    logcollector_central
+                    webhook_distributor_filter
+                    esl_incoming_fanout_filter
+                /],
+            );
+            input zmq_in => (
+                class => 'ZeroMQ',
+                socket_bind => 'tcp://127.0.0.1:5222',
+                output_to => 't',
+            );
+            input syslog_in => (
+                class => 'Syslog',
+                output_to => 't',
+            );
+        };
+
 done_testing;
 

-- 
libmessage-passing-perl Debian packaging



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