Mercurial > pub > Impl
diff Lib/IMPL/DOM/Schema/NodeSet.pm @ 24:7f00786f8210
Первая рабочая реазизация схемы и навигаторов
author | Sergey |
---|---|
date | Mon, 05 Oct 2009 00:48:49 +0400 |
parents | 267460284fb3 |
children | 16ada169ca75 |
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Schema/NodeSet.pm Wed Sep 30 17:43:52 2009 +0400 +++ b/Lib/IMPL/DOM/Schema/NodeSet.pm Mon Oct 05 00:48:49 2009 +0400 @@ -20,7 +20,7 @@ $this->messageMax( $args{messageMax} || 'Too many %Node.nodeName% nodes'); $this->messageMin( $args{messageMin} || '%Schema.name% nodes expected'); - $this->messageUnexpected( $args{messageUnexpected} || 'A %Node.nodeName% isn\'t allowed here'); + $this->messageUnexpected( $args{messageUnexpected} || 'A %Node.nodeName% isn\'t allowed in %Node.parentNode.path%'); } sub Validate { @@ -41,7 +41,7 @@ foreach my $child ( @{$node->childNodes} ) { if (my $info = $nodes{$child->nodeName} || $anyNode) { $info->{Seen}++; - push @errors,new IMPL::DOM::Schema::VaidationError ( + push @errors,new IMPL::DOM::Schema::ValidationError ( Source => $this, Node => $child, Schema => $info->{Schema}, @@ -52,7 +52,7 @@ push @errors,@localErrors; } } else { - push @errors, new IMPL::DOM::Schema::VaidationError ( + push @errors, new IMPL::DOM::Schema::ValidationError ( Source => $this, Node => $child, Schema => $info->{Schema}, @@ -62,7 +62,7 @@ } foreach my $info (values %nodes) { - push @errors, new IMPL::DOM::Schema::VaidationError ( + push @errors, new IMPL::DOM::Schema::ValidationError ( Source => $this, Schema => $info->{Schema}, Node => $node,