--- a/Lib/IMPL/DOM/Node.pm	Fri Aug 28 16:26:20 2009 +0400
+++ b/Lib/IMPL/DOM/Node.pm	Wed Sep 02 17:47:44 2009 +0400
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use base qw(IMPL::Object IMPL::Object::Serializable IMPL::Object::Autofill);
+use base qw(IMPL::Object);
 
 use IMPL::Object::List;
 use IMPL::Class::Property;
@@ -11,8 +11,6 @@
 
 use IMPL::Exception;
 
-__PACKAGE__->PassThroughArgs;
-
 BEGIN {
     public _direct property nodeName => prop_get | owner_set;
     public _direct property isComplex => { get => \&_getIsComplex } ;
@@ -23,9 +21,9 @@
 }
 
 sub CTOR {
-    my ($this,$name) = @_;
+    my ($this,%args) = @_;
     
-    $this->nodeName($name) or die new IMPL::InvalidArgumentException("A name is required");
+    $this->nodeName($args{nodeName}) or die new IMPL::InvalidArgumentException("A name is required");
 }
 
 sub insertNode {
@@ -112,9 +110,9 @@
 }
 
 sub _setParent {
-    my ($this,$parentNode) = @_;
+    my ($this,$node) = @_;
     
-    $this->{$parentNode} = $parentNode;
+    $this->{$parentNode} = $node;
     weaken($this->{$parentNode});
 }