File Coverage

blib/lib/AnyEvent/XMPP/Error/Register.pm
Criterion Covered Total %
statement 1 3 33.3
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 2 4 50.0


line stmt bran cond sub pod time code
1             package AnyEvent::XMPP::Error::Register;
2 1     1   1673 use AnyEvent::XMPP::Error;
  0            
  0            
3             use strict;
4             our @ISA = qw/AnyEvent::XMPP::Error::IQ/;
5              
6             =head1 NAME
7              
8             AnyEvent::XMPP::Error::Register - In-band registration error
9              
10             Subclass of L
11              
12             =cut
13              
14             =head1 DESCRIPTION
15              
16             This is a In-band registration error. For a mapping
17             of IQ error values to their meaning please consult
18             XEP-0077 for now.
19              
20             =head1 METHODS
21              
22             =over 4
23              
24             =item B
25              
26             Returns the state of registration, one of:
27              
28             register
29             unregister
30             submit
31              
32             =cut
33              
34             sub register_state {
35             my ($self) = @_;
36             $self->{register_state}
37             }
38              
39             sub string {
40             my ($self) = @_;
41              
42             sprintf "ibb registration error (in %s): %s",
43             $self->register_state,
44             $self->SUPER::string
45             }
46              
47             =back
48              
49             =head1 AUTHOR
50              
51             Robin Redeker, C<< >>, JID: C<< >>
52              
53             =head1 COPYRIGHT & LICENSE
54              
55             Copyright 2007, 2008 Robin Redeker, all rights reserved.
56              
57             This program is free software; you can redistribute it and/or modify it
58             under the same terms as Perl itself.
59              
60             =cut
61              
62             1; # End of AnyEvent::XMPP