File Coverage

blib/lib/Message/Passing/AMQP/Role/HasAConnection.pm
Criterion Covered Total %
statement 9 12 75.0
branch n/a
condition n/a
subroutine 3 6 50.0
pod n/a
total 12 18 66.6


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