view Lib/IMPL/DOM/Schema/SimpleNode.pm @ 14:65a7bb156fb7

Дом модель и схема
author Sergey
date Fri, 04 Sep 2009 16:38:15 +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