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


The following commit has been merged in the master branch:
commit 3491f05ce2fc36afca2d4550c77e2ac3f092cd1d
Author: Tomas Doran <bobtfish at bobtfish.net>
Date:   Sun Jul 8 08:15:29 2012 +0100

    Fix more bugs

diff --git a/lib/Message/Passing/Role/ConnectionManager.pm b/lib/Message/Passing/Role/ConnectionManager.pm
index a230de5..5751742 100644
--- a/lib/Message/Passing/Role/ConnectionManager.pm
+++ b/lib/Message/Passing/Role/ConnectionManager.pm
@@ -1,7 +1,8 @@
 package Message::Passing::Role::ConnectionManager;
 use Moo::Role;
-use MooX::Types::MooseLike qw/ Bool /;
+use MooX::Types::MooseLike::Base qw/ Bool ArrayRef /;
 use Scalar::Util qw/ blessed weaken /;
+use Carp qw/ confess /;
 use namespace::clean -except => 'meta';
 
 requires '_build_connection';
@@ -74,7 +75,7 @@ before _clear_connection => sub {
 };
 
 has _connect_subscribers => (
-    isa => 'ArrayRef',
+    isa => ArrayRef,
     is => 'ro',
     default => sub { [] },
     writer => '_set_connect_subscribers',
diff --git a/lib/Message/Passing/Role/Script.pm b/lib/Message/Passing/Role/Script.pm
index 73b77c7..c38d3c8 100644
--- a/lib/Message/Passing/Role/Script.pm
+++ b/lib/Message/Passing/Role/Script.pm
@@ -11,7 +11,7 @@ requires 'build_chain';
 has daemonize => (
     is => 'ro',
     isa => Bool,
-    default => 0,
+    default => sub { 0 },
 );
 
 has io_priority => (
diff --git a/t/crypt_cbc.t b/t/crypt_cbc.t
index b606cd2..915c7f2 100644
--- a/t/crypt_cbc.t
+++ b/t/crypt_cbc.t
@@ -2,9 +2,6 @@ use strict;
 use warnings;
 use Test::More;
 use Try::Tiny;
-use Message::Passing::Input::Null;
-use Message::Passing::Output::Test;
-use Message::Passing::Output::Null;
 
 plan skip_all => "No Crypt::CBC or no Crypt::Blowfish"
     unless try {
@@ -14,6 +11,9 @@ plan skip_all => "No Crypt::CBC or no Crypt::Blowfish"
 
 use_ok 'Message::Passing::Filter::Decoder::Crypt::CBC';
 use_ok 'Message::Passing::Filter::Encoder::Crypt::CBC';
+use_ok 'Message::Passing::Output::Test';
+use_ok 'Message::Passing::Input::Null';
+use_ok 'Message::Passing::Output::Null';
 
 my $cbct = Message::Passing::Output::Test->new;
 my $cbc = Message::Passing::Input::Null->new(

-- 
libmessage-passing-perl Debian packaging



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