File Coverage

blib/lib/Bot/Backbone/Service/Role/Sender.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             package Bot::Backbone::Service::Role::Sender;
2             $Bot::Backbone::Service::Role::Sender::VERSION = '0.160630';
3 4     4   1737 use Moose::Role;
  4         6  
  4         19  
4              
5             # ABSTRACT: Marks a service as one that may send messages
6              
7              
8             requires qw( send_message send_reply );
9              
10             1;
11              
12             __END__
13            
14             =pod
15            
16             =encoding UTF-8
17            
18             =head1 NAME
19            
20             Bot::Backbone::Service::Role::Sender - Marks a service as one that may send messages
21            
22             =head1 VERSION
23            
24             version 0.160630
25            
26             =head1 DESCRIPTION
27            
28             A sender is a service that provides C<send_message> and C<send_reply> methods.
29            
30             =head1 REQUIRED METHODS
31            
32             =head2 send_reply
33            
34             $chat->send_reply($message, \%options);
35            
36             This is often just a wrapper provided around C<send_message>. The first
37             argument is the original L<Bot::Backbone::Message> that this is in reply to.
38            
39             The second argument is the options to describe the reply being sent.
40            
41             =head2 send_message
42            
43             $chat->send_message(%options);
44            
45             The options describe the to send.
46            
47             =head1 AUTHOR
48            
49             Andrew Sterling Hanenkamp <hanenkamp@cpan.org>
50            
51             =head1 COPYRIGHT AND LICENSE
52            
53             This software is copyright (c) 2016 by Qubling Software LLC.
54            
55             This is free software; you can redistribute it and/or modify it under
56             the same terms as the Perl 5 programming language system itself.
57            
58             =cut
59