view Lib/IMPL/DOM/Schema/SimpleNode.pm @ 18:818c74b038ae

DOM Schema + tests
author Sergey
date Thu, 10 Sep 2009 17:42:47 +0400
parents fffb153be599
children 1ca530e5c9c5
line wrap: on
line source

package IMPL::DOM::Schema::SimpleNode;
use strict;
use warnings;

use base qw(IMPL::DOM::Schema::Item);

__PACKAGE__->PassThroughArgs;

sub Validate {
    my ($this,$node) = @_;
    
    map $_->Validate($node), @{$this->childNodes};    
}

1;

__END__

=pod

=head1 DESCRIPTION

Узел имеющий простое значение. Данный узел может содержать ограничения
на простое значение.


=cut