Mercurial > pub > Impl
comparison Lib/IMPL/DOM/Schema.pm @ 266:89179bb8c388
*corrected TTView to handle plain (and undefined) values
*added URL generating methods to Application::Action
*fixed the compare validatior for schemas
| author | cin |
|---|---|
| date | Mon, 14 Jan 2013 03:10:06 +0400 |
| parents | 0f59b2de72af |
| children | 4ddb27ff4a0b |
comparison
equal
deleted
inserted
replaced
| 265:6b6d4b2275a1 | 266:89179bb8c388 |
|---|---|
| 126 my ($this,$node) = @_; | 126 my ($this,$node) = @_; |
| 127 | 127 |
| 128 if ( my ($schemaNode) = $this->selectNodes(sub { $_->isa(Node) and $_[0]->name eq $node->nodeName })) { | 128 if ( my ($schemaNode) = $this->selectNodes(sub { $_->isa(Node) and $_[0]->name eq $node->nodeName })) { |
| 129 $schemaNode->Validate($node); | 129 $schemaNode->Validate($node); |
| 130 } else { | 130 } else { |
| 131 return new IMPL::DOM::Schema::ValidationError(Node => $node, Message=> "A specified document (%Node.nodeName%) doesn't match the schema"); | 131 return new IMPL::DOM::Schema::ValidationError(node => $node, message=> "A specified document (%Node.nodeName%) doesn't match the schema"); |
| 132 } | 132 } |
| 133 } | 133 } |
| 134 | 134 |
| 135 my $schema; | 135 my $schema; |
| 136 | 136 |
