--- a/Lib/IMPL/DOM/Document.pm	Thu May 02 10:43:49 2013 +0400
+++ b/Lib/IMPL/DOM/Document.pm	Tue May 07 02:19:24 2013 +0400
@@ -3,9 +3,14 @@
 use warnings;
 
 use IMPL::lang;
-use parent qw(IMPL::DOM::Node);
-
-__PACKAGE__->PassThroughArgs;
+use IMPL::declare {
+    require => {
+        DOMNode => 'IMPL::DOM::Node'
+    },
+    base => [
+        DOMNode => '@_'
+    ]
+};
 
 sub document {
     return $_[0];
@@ -19,7 +24,7 @@
         $class = undef;
     }
     
-    $class ||= typeof IMPL::DOM::Node;
+    $class ||= DOMNode;
     $refProps ||= {};
     
     delete $refProps->{nodeName};