Mercurial > pub > Impl

comparison Lib/IMPL/DOM/Transform/ObjectToDOM.pm @ 237:61db68166c37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
refactoring QueryToDOM
author sergey
date Mon, 15 Oct 2012 17:39:12 +0400
parents 2904da230022
children 2746a8e5a6c4
comparison
equal deleted inserted replaced
236:2904da230022 237:61db68166c37
23 _navi => PROP_RW 23 _navi => PROP_RW
24 ] 24 ]
25 }; 25 };
26 26
27 sub CTOR { 27 sub CTOR {
28 my ($this,$docName,$docSchema) = @_; 28 my ($this,$docName,$docSchema,$transforms) = @_;
29 29
30 my $docNodeSchema = $docSchema->selectSingleNode(sub { $_->name eq $docName }) 30 my $docNodeSchema = $docSchema->selectSingleNode(sub { $_->name eq $docName })
31 or die OperationException->new("Can't find a node schema for the document '$docName'"); 31 or die OperationException->new("Can't find a node schema for the document '$docName'");
32 32
33 my $docClass = ($docNodeSchema->can('nativeType') ? $docNodeSchema->nativeType : undef) || 'IMPL::DOM::Document'; 33 my $docClass = ($docNodeSchema->can('nativeType') ? $docNodeSchema->nativeType : undef) || 'IMPL::DOM::Document';