--- a/Lib/IMPL/DOM/Schema/SimpleNode.pm	Fri Aug 20 16:33:37 2010 +0400
+++ b/Lib/IMPL/DOM/Schema/SimpleNode.pm	Thu Sep 23 03:58:43 2010 +0400
@@ -5,10 +5,11 @@
 use base qw(IMPL::DOM::Schema::Node);
 use IMPL::Class::Property;
 use IMPL::Class::Property::Direct;
+use IMPL::DOM::Property qw(_dom);
 
 BEGIN {
-	public _direct property inflator => prop_get;
-	public _direct property messageInflateError => prop_get;
+	public _dom _direct property inflator => prop_get;
+	public _dom _direct property messageInflateError => prop_get;
 }
 
 our %CTOR = (
@@ -23,8 +24,10 @@
 sub CTOR {
 	my ($this,%args) = @_;
 	
-	$this->{$inflator} = $args{inflator} if $args{inflator};
-	$this->{$messageInflateError} = $args{messageInflateError} || 'Failed to inflate nodeValue %Node.path%: %Error%';
+	if ( $args{inflator} ) {
+		$this->{$inflator} = $args{inflator} ;
+		$this->{$messageInflateError} = exists $args{messageInflateError} ? $args{messageInflateError} : 'Failed to inflate nodeValue %Node.path%: %Error%';
+	}
 }
 
 sub Validate {