Mercurial > pub > Impl

comparison Lib/IMPL/DOM/Schema/Property.pm @ 381:ced5937ff21a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Custom getters/setters support method names in theirs definitions Initial support for localizable labels in DOM schemas
author cin
date Wed, 22 Jan 2014 16:56:10 +0400
parents 0f59b2de72af
children 5aff94ba842f
comparison
equal deleted inserted replaced
380:1eca08048ba9 381:ced5937ff21a
34 34
35 sub Validate { 35 sub Validate {
36 my ($this,$node,$ctx) = @_; 36 my ($this,$node,$ctx) = @_;
37 37
38 my $prop = $this->name; 38 my $prop = $this->name;
39
40 # buld a pseudo node for the property value 39 # buld a pseudo node for the property value
41 my $nodeProp = new IMPL::DOM::Node(nodeName => '::property', nodeValue => eval { $node->$prop() } || $node->nodeProperty($prop)); 40 my $nodeProp = new IMPL::DOM::Node(nodeName => '::property', nodeValue => eval { $node->$prop() } || $node->nodeProperty($prop));
42 41
43 if ($nodeProp->nodeValue) { 42 if ($nodeProp->nodeValue) {
44 # we have a value so validate it 43 # we have a value so validate it