diff Lib/IMPL/Web/View/Metadata/FormMeta.pm @ 387:4cc6cc370fb2

DOM refactoring
author sergey
date Tue, 11 Feb 2014 01:13:47 +0400
parents 0d63f5273307
children 5aff94ba842f
line wrap: on
line diff
--- a/Lib/IMPL/Web/View/Metadata/FormMeta.pm	Tue Feb 11 01:06:40 2014 +0400
+++ b/Lib/IMPL/Web/View/Metadata/FormMeta.pm	Tue Feb 11 01:13:47 2014 +0400
@@ -96,6 +96,7 @@
 sub _IsOwnError {
     my ($nodes,$source,$err) = @_;
 
+    #TODO: review filter
  	return 1 if ($err->node && grep($err->node == $_, @$nodes)) || (not(@$nodes) && $err->schema == $source );
     
     return 0;
@@ -133,7 +134,7 @@
 		my $schema = $navi->NavigateName($decl->name);
 		$navi->SchemaBack();
 		
-		my @nodes = $this->model && $this->model->selectNodes( sub { $_->schemaSource == $decl } );
+		my @nodes = $this->model && $this->model->selectNodes( sub { $_->schemaNode == $decl } );
 		
 		my %args = (
 			name => $decl->name,