Mercurial > pub > Impl

diff Lib/IMPL/DOM/Node.pm @ 34:a8086f85a571

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Dom Builder
author Sergey
date Mon, 16 Nov 2009 18:39:25 +0300
parents dd4d72600c69
children 1828103371d0
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Node.pm	Mon Nov 09 16:49:39 2009 +0300
+++ b/Lib/IMPL/DOM/Node.pm	Mon Nov 16 18:39:25 2009 +0300
@@ -24,8 +24,10 @@
 sub CTOR {
     my ($this,%args) = @_;
     
-    $this->nodeName($args{nodeName}) or die new IMPL::InvalidArgumentException("A name is required");
-    $this->nodeValue($args{nodeValue});
+    $this->nodeName(delete $args{nodeName}) or die new IMPL::InvalidArgumentException("A name is required");
+    $this->nodeValue(delete $args{nodeValue});
+    
+    $this->{$_propertyMap} = \%args;
 }
 
 sub insertNode {