comparison Lib/IMPL/Web/TT/Form.pm @ 173:aaab45153411

minor bugfixes
author sourcer
date Wed, 14 Sep 2011 18:59:01 +0400
parents 4267a2ac3d46
children d1676be8afcc
comparison
equal deleted inserted replaced
172:068acfe903c3 173:aaab45153411
134 134
135 sub makeControlArgs{ 135 sub makeControlArgs{
136 my ($this,$path) = @_; 136 my ($this,$path) = @_;
137 137
138 my $navi = new IMPL::DOM::Navigator::SchemaNavigator($this->schema); 138 my $navi = new IMPL::DOM::Navigator::SchemaNavigator($this->schema);
139 my @path = ($this->base, split /\./,$path); 139 my @path = ($this->base, split(/\./,$path) );
140 140
141 $navi->NavigateName($_) or die new IMPL::InvalidArgumentException( 141 $navi->NavigateName($_) or die new IMPL::InvalidArgumentException(
142 "Can't find a definition for an element", 142 "Can't find a definition for an element",
143 $_, 143 $_,
144 $path, 144 $path,