File Coverage

blib/lib/XML/SRS/AckMessage.pm
Criterion Covered Total %
statement 2 4 50.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 4 6 66.6


line stmt bran cond sub pod time code
1              
2             package XML::SRS::AckMessage;
3             BEGIN {
4 1     1   8624 $XML::SRS::AckMessage::VERSION = '0.09';
5             }
6              
7 1     1   1991 use Moose;
  0            
  0            
8             use PRANG::Graph;
9             use XML::SRS::Types;
10              
11             sub root_element {
12             "AckMessage";
13             }
14              
15             has_attr 'transaction_id' =>
16             is => "ro",
17             isa => "XML::SRS::UID",
18             xml_name => "TransId",
19             required => 1,
20             ;
21              
22             has_attr 'originating_registrar' =>
23             is => "ro",
24             isa => "Str",
25             xml_name => "OriginatingRegistrarId",
26             ;
27              
28             with 'XML::SRS::Action';
29             1;