comparison Lib/IMPL/DOM/Navigator/SchemaNavigator.pm @ 341:70658970af15

small fixes
author cin
date Mon, 24 Jun 2013 04:05:14 +0400
parents 4ddb27ff4a0b
children 010ceafd0c5a
comparison
equal deleted inserted replaced
340:c090d9102a38 341:70658970af15
73 # navigate to the target node 73 # navigate to the target node
74 $node = $this->Navigate(sub { $_->name eq $name }); 74 $node = $this->Navigate(sub { $_->name eq $name });
75 $steps ++; 75 $steps ++;
76 } 76 }
77 77
78 die IMPL::Exception->new("A node is expected")
79 unless $node;
78 if ($node->nodeName eq 'Node') { 80 if ($node->nodeName eq 'Node') {
79 # if we navigate to a reference 81 # if we navigate to a reference
80 # resolve it 82 # resolve it
81 $node = $this->{$Schema}->resolveType($node->type); 83 $node = $this->{$Schema}->resolveType($node->type);
82 $this->internalNavigateNodeSet($node); 84 $this->internalNavigateNodeSet($node);