comparison Lib/IMPL/DOM/Document.pm @ 24:7f00786f8210

Первая рабочая реазизация схемы и навигаторов
author Sergey
date Mon, 05 Oct 2009 00:48:49 +0400
parents 818c74b038ae
children 1828103371d0
comparison
equal deleted inserted replaced
23:716b287d4795 24:7f00786f8210
8 8
9 sub Create { 9 sub Create {
10 my ($this,$nodeName,$class,$refProps) = @_; 10 my ($this,$nodeName,$class,$refProps) = @_;
11 11
12 $refProps ||= {}; 12 $refProps ||= {};
13
14 delete $refProps->{nodeName};
13 15
14 return $class->new( 16 return $class->new(
15 nodeName => $nodeName, 17 nodeName => $nodeName,
16 %$refProps 18 %$refProps
17 ); 19 );