Mercurial > pub > Impl

comparison _test/Test/DOM/Node.pm @ 24:7f00786f8210

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Первая рабочая реазизация схемы и навигаторов
author Sergey
date Mon, 05 Oct 2009 00:48:49 +0400
parents 818c74b038ae
children c2e7f7c96bcd
comparison
equal deleted inserted replaced
23:716b287d4795 24:7f00786f8210
84 }; 84 };
85 85
86 test SelectNodesByQuery => sub { 86 test SelectNodesByQuery => sub {
87 my ($this) = @_; 87 my ($this) = @_;
88 88
89 my @result = $this->Root->selectNodes(sub { $_[0]->nodeName =~ /child/i } ); 89 my @result = $this->Root->selectNodes(sub { $_->nodeName =~ /child/i } );
90 failed 90 failed
91 "Wrong number of a selected nodes", 91 "Wrong number of a selected nodes",
92 "Expected: 2", 92 "Expected: 2",
93 "Actual: ".scalar(@result) 93 "Actual: ".scalar(@result)
94 unless @result == 2; 94 unless @result == 2;