File Coverage

blib/lib/Message/Passing/AMQP/Role/HasAConnection.pm
Criterion Covered Total %
statement 6 9 66.6
branch n/a
condition n/a
subroutine 2 5 40.0
pod n/a
total 8 14 57.1


line stmt bran cond sub pod time code
1             package Message::Passing::AMQP::Role::HasAConnection;
2 1     1   96788 use Moose::Role;
  1         6097  
  1         5  
3 1     1   8309 use namespace::autoclean;
  1         10668  
  1         8  
4              
5             with qw/
6             Message::Passing::Role::HasAConnection
7             Message::Passing::Role::HasHostnameAndPort
8             Message::Passing::Role::HasUsernameAndPassword
9             /;
10              
11 0     0     sub _default_port { 5672 }
12              
13             has tls => (
14             is => 'ro',
15             isa => 'Bool',
16             default => sub { 0 },
17             );
18              
19             has vhost => (
20             is => 'ro',
21             isa => 'Str',
22             default => sub { '/' },
23             );
24              
25             has verbose => (
26             is => 'ro',
27             isa => 'Bool',
28             default => sub { 0 },
29             );
30              
31 0     0     sub _connection_manager_class { 'Message::Passing::AMQP::ConnectionManager' }
32 0     0     sub _connection_manager_attributes { [qw/ username password hostname port tls vhost verbose /] }
33              
34             1;
35              
36             =head1 NAME
37              
38             Message::Passing::AMQP::Role::HasAConnection - Implements the Message::Passing::Role::HasAConnection interface..
39              
40             =head1 ATTRIBUTES
41              
42             =head2 vhost
43              
44             Gets passed to L<Message::Passing::AMQP::ConnectionManager>, defaults to '/'.
45              
46             =head2 verbose
47              
48             Gets passed to L<Message::Passing::AMQP::ConnectionManager>, defaults to false.
49              
50             =head1 AUTHOR, COPYRIGHT AND LICENSE
51              
52             See L<Message::Passing::AMQP>.
53              
54             =cut