File Coverage

blib/lib/XML/SRS/Handle.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

package XML::SRS::Handle;
BEGIN {
  $XML::SRS::Handle::VERSION = '0.09';
}
use Moose;
use PRANG::Graph;
use XML::SRS::Types;
use PRANG::XMLSchema::Types;

extends 'XML::SRS::Contact';

has '+handle_id' =>
	required => 1,
	;

has_attr 'registrar_id' =>
	is => "rw",
	isa => "XML::SRS::RegistrarId",
	xml_required => 0,
	xml_name => "RegistrarId",
	;

has_element 'created_date' =>
	is => 'ro',
	isa => 'XML::SRS::TimeStamp',
	xml_required => 0,
	xml_nodeName => 'CreatedDate',

	#coerce => 1,
	;

has_element 'audit' =>
	is => "rw",
	isa => "XML::SRS::AuditDetails",
	xml_nodeName => "AuditDetails",
	predicate => "has_audit",
	;

has_element 'changed_domains' =>
	is => "ro",
	isa => "XML::SRS::ChangedDomains",
	xml_nodeName => "ChangedDomains",
	predicate => "has_changed_domains",
	;

has_attr 'action_id' =>
	is => "rw",
	isa => "XML::SRS::UID",
	xml_name => 'ActionId',
	xml_required => 0,
	;

sub root_element {
	"Handle";
}
with 'XML::SRS::ActionResponse';

1;